; Disassembly of the file "C:\Game Tech\Test Equipment\Fluke\128C900.U9"
;
; Created with dZ80 v1.31
;
; on Thursday, 23 of August 2001 at 10:43 PM
;
0000  dd210000  ld      ix,#0000
0004  1864      jr      #006a           ; (100)
0006  2af4c3    ld      hl,(#c3f4)
0009  86        add     a,(hl)
000a  7e        ld      a,(hl)
000b  ae        xor     (hl)
000c  e9        jp      (hl)
000d  c353b3    jp      #b353
0010  c31a7f    jp      #7f1a
0013  14        inc     d
0014  f1        pop     af
0015  c384b1    jp      #b184
0018  c346be    jp      #be46
001b  5f        ld      e,a
001c  f3        di      
001d  c35188    jp      #8851
0020  c377be    jp      #be77
0023  3ef1      ld      a,#f1
0025  c31d8b    jp      #8b1d
0028  c31281    jp      #8112
002b  60        ld      h,b
002c  f1        pop     af
002d  c3f692    jp      #92f6
0030  c368be    jp      #be68
0033  96        sub     (hl)
0034  04        inc     b
0035  c3be93    jp      #93be
0038  c315b9    jp      #b915
003b  e5        push    hl
003c  2a2af4    ld      hl,(#f42a)
003f  09        add     hl,bc
0040  e3        ex      (sp),hl
0041  c9        ret     

0042  e5        push    hl
0043  2a2af4    ld      hl,(#f42a)
0046  19        add     hl,de
0047  e3        ex      (sp),hl
0048  c9        ret     

0049  e5        push    hl
004a  c5        push    bc
004b  ed4b2af4  ld      bc,(#f42a)
004f  09        add     hl,bc
0050  c1        pop     bc
0051  e3        ex      (sp),hl
0052  c9        ret     

0053  d9        exx     
0054  f0        ret     p

0055  5e        ld      e,(hl)
0056  f1        pop     af
0057  31f347    ld      sp,#47f3
005a  f3        di      
005b  4f        ld      c,a
005c  f3        di      
005d  c36f73    jp      #736f
0060  c37f94    jp      #947f
0063  c35d42    jp      #425d
0066  dd210100  ld      ix,#0001
006a  1872      jr      #00de           ; (114)
006c  69        ld      l,c
006d  e9        jp      (hl)
006e  40        ld      b,b
006f  f1        pop     af
0070  c3c57f    jp      #7fc5
0073  b8        cp      b
0074  f0        ret     p

0075  ba        cp      d
0076  f0        ret     p

0077  be        cp      (hl)
0078  f0        ret     p

0079  c1        pop     bc
007a  f0        ret     p

007b  daf013    jp      c,#13f0
007e  f1        pop     af
007f  15        dec     d
0080  f1        pop     af
0081  21f126    ld      hl,#26f1
0084  f1        pop     af
0085  27        daa     
0086  f1        pop     af
0087  34        inc     (hl)
0088  f1        pop     af
0089  35        dec     (hl)
008a  f1        pop     af
008b  39        add     hl,sp
008c  f1        pop     af
008d  56        ld      d,(hl)
008e  f1        pop     af
008f  5f        ld      e,a
0090  f1        pop     af
0091  e1        pop     hl
0092  f228f3    jp      p,#f328
0095  32f333    ld      (#33f3),a
0098  f3        di      
0099  37        scf     
009a  f3        di      
009b  c3f1a6    jp      #a6f1
009e  c320b9    jp      #b920
00a1  c32dba    jp      #ba2d
00a4  c31dbb    jp      #bb1d
00a7  c33ebd    jp      #bd3e
00aa  c36cb9    jp      #b96c
00ad  c391bb    jp      #bb91
00b0  c3b7b4    jp      #b4b7
00b3  c34cb5    jp      #b54c
00b6  c34c78    jp      #784c
00b9  c39573    jp      #7395
00bc  c3cda3    jp      #a3cd
00bf  c3ab04    jp      #04ab
00c2  c37c76    jp      #767c
00c5  c3c38e    jp      #8ec3
00c8  c3a292    jp      #92a2
00cb  c31395    jp      #9513
00ce  c3ab99    jp      #99ab
00d1  c3657f    jp      #7f65
00d4  c32386    jp      #8623
00d7  c3ba81    jp      #81ba
00da  a1        and     c
00db  f1        pop     af
00dc  e6f2      and     #f2
00de  db81      in      a,(#81)
00e0  dbe2      in      a,(#e2)
00e2  08        ex      af,af'
00e3  3e30      ld      a,#30
00e5  d3c1      out     (#c1),a
00e7  3ef9      ld      a,#f9
00e9  d3c0      out     (#c0),a
00eb  3e34      ld      a,#34
00ed  d3c1      out     (#c1),a
00ef  3e34      ld      a,#34
00f1  d3c3      out     (#c3),a
00f3  3e99      ld      a,#99
00f5  d3c0      out     (#c0),a
00f7  3e3c      ld      a,#3c
00f9  d3c3      out     (#c3),a
00fb  3eff      ld      a,#ff
00fd  3200c0    ld      (#c000),a
0100  2100c0    ld      hl,#c000
0103  1101c0    ld      de,#c001
0106  01ff3f    ld      bc,#3fff
0109  edb0      ldir    
010b  2100c0    ld      hl,#c000
010e  010040    ld      bc,#4000
0111  eda1      cpi     
0113  2005      jr      nz,#011a        ; (5)
0115  e21f01    jp      po,#011f
0118  18f7      jr      #0111           ; (-9)
011a  010200    ld      bc,#0002
011d  dd09      add     ix,bc
011f  3e00      ld      a,#00
0121  3200c0    ld      (#c000),a
0124  2100c0    ld      hl,#c000
0127  1101c0    ld      de,#c001
012a  01ff3f    ld      bc,#3fff
012d  edb0      ldir    
012f  2100c0    ld      hl,#c000
0132  010040    ld      bc,#4000
0135  eda1      cpi     
0137  2005      jr      nz,#013e        ; (5)
0139  e24301    jp      po,#0143
013c  18f7      jr      #0135           ; (-9)
013e  010400    ld      bc,#0004
0141  dd09      add     ix,bc
0143  310000    ld      sp,#0000
0146  dde5      push    ix
0148  e1        pop     hl
0149  08        ex      af,af'
014a  32b8f0    ld      (#f0b8),a
014d  cdf101    call    #01f1
0150  01febf    ld      bc,#bffe
0153  110000    ld      de,#0000
0156  210000    ld      hl,#0000
0159  7b        ld      a,e
015a  86        add     a,(hl)
015b  5f        ld      e,a
015c  3e00      ld      a,#00
015e  8a        adc     a,d
015f  57        ld      d,a
0160  23        inc     hl
0161  0b        dec     bc
0162  79        ld      a,c
0163  b0        or      b
0164  20f3      jr      nz,#0159        ; (-13)
0166  ed4bfebf  ld      bc,(#bffe)
016a  eb        ex      de,hl
016b  09        add     hl,bc
016c  4d        ld      c,l
016d  44        ld      b,h
016e  c9        ret     

016f  6a        ld      l,d
0170  5e        ld      e,(hl)
0171  15        dec     d
0172  3e15      ld      a,#15
0174  3e15      ld      a,#15
0176  3ed1      ld      a,#d1
0178  1860      jr      #01da           ; (96)
017a  1a        ld      a,(de)
017b  8d        adc     a,l
017c  19        add     hl,de
017d  8d        adc     a,l
017e  19        add     hl,de
017f  8d        adc     a,l
0180  19        add     hl,de
0181  8d        adc     a,l
0182  19        add     hl,de
0183  5d        ld      e,l
0184  5b        ld      e,e
0185  00        nop     
0186  5b        ld      e,e
0187  00        nop     
0188  00        nop     
0189  66        ld      h,(hl)
018a  5a        ld      e,d
018b  00        nop     
018c  00        nop     
018d  2d        dec     l
018e  067d      ld      b,#7d
0190  07        rlca    
0191  52        ld      d,d
0192  09        add     hl,bc
0193  52        ld      d,d
0194  08        ex      af,af'
0195  260a      ld      h,#0a
0197  cf        rst     #8
0198  0a        ld      a,(bc)
0199  00        nop     
019a  00        nop     
019b  00        nop     
019c  00        nop     
019d  00        nop     
019e  00        nop     
019f  1c        inc     e
01a0  1846      jr      #01e8           ; (70)
01a2  3d        dec     a
01a3  59        ld      e,c
01a4  0c        inc     c
01a5  b6        or      (hl)
01a6  0eec      ld      c,#ec
01a8  0e64      ld      c,#64
01aa  0f        rrca    
01ab  00        nop     
01ac  00        nop     
01ad  00        nop     
01ae  00        nop     
01af  00        nop     
01b0  00        nop     
01b1  00        nop     
01b2  00        nop     
01b3  4b        ld      c,e
01b4  384b      jr      c,#0201         ; (75)
01b6  384b      jr      c,#0203         ; (75)
01b8  384b      jr      c,#0205         ; (75)
01ba  384b      jr      c,#0207         ; (75)
01bc  38da      jr      c,#0198         ; (-38)
01be  10e5      djnz    #01a5           ; (-27)
01c0  37        scf     
01c1  5d        ld      e,l
01c2  42        ld      b,d
01c3  6a        ld      l,d
01c4  55        ld      d,l
01c5  6a        ld      l,d
01c6  55        ld      d,l
01c7  c5        push    bc
01c8  43        ld      b,e
01c9  92        sub     d
01ca  39        add     hl,sp
01cb  4c        ld      c,h
01cc  13        inc     de
01cd  90        sub     b
01ce  45        ld      b,l
01cf  00        nop     
01d0  00        nop     
01d1  00        nop     
01d2  00        nop     
01d3  00        nop     
01d4  00        nop     
01d5  00        nop     
01d6  00        nop     
01d7  e5        push    hl
01d8  37        scf     
01d9  6a        ld      l,d
01da  1800      jr      #01dc           ; (0)
01dc  00        nop     
01dd  00        nop     
01de  00        nop     
01df  00        nop     
01e0  00        nop     
01e1  00        nop     
01e2  00        nop     
01e3  00        nop     
01e4  00        nop     
01e5  00        nop     
01e6  00        nop     
01e7  00        nop     
01e8  00        nop     
01e9  00        nop     
01ea  00        nop     
01eb  00        nop     
01ec  00        nop     
01ed  93        sub     e
01ee  1825      jr      #0215           ; (37)
01f0  17        rla     
01f1  e7        rst     #20
01f2  21f5ff    ld      hl,#fff5
01f5  39        add     hl,sp
01f6  f9        ld      sp,hl
01f7  dd6e04    ld      l,(ix+#04)
01fa  cd5b05    call    #055b
01fd  2e11      ld      l,#11
01ff  cd9573    call    #7395
0202  3a16f1    ld      a,(#f116)
0205  b7        or      a
0206  2822      jr      z,#022a         ; (34)
0208  2e17      ld      l,#17
020a  cd7c76    call    #767c
020d  79        ld      a,c
020e  b7        or      a
020f  2819      jr      z,#022a         ; (25)
0211  3a26f1    ld      a,(#f126)
0214  fe28      cp      #28
0216  2035      jr      nz,#024d        ; (53)
0218  2e08      ld      l,#08
021a  cd36b1    call    #b136
021d  3e7f      ld      a,#7f
021f  3226f1    ld      (#f126),a
0222  cd1c18    call    #181c
0225  2e08      ld      l,#08
0227  cd1fb1    call    #b11f
022a  3a40f1    ld      a,(#f140)
022d  fe02      cp      #02
022f  c2f502    jp      nz,#02f5
0232  3a25f1    ld      a,(#f125)
0235  dd77f5    ld      (ix-#0b),a
0238  3a27f1    ld      a,(#f127)
023b  fe1d      cp      #1d
023d  2845      jr      z,#0284         ; (69)
023f  3a27f1    ld      a,(#f127)
0242  fe1a      cp      #1a
0244  283e      jr      z,#0284         ; (62)
0246  3e01      ld      a,#01
0248  3225f1    ld      (#f125),a
024b  1837      jr      #0284           ; (55)
024d  3ab7f0    ld      a,(#f0b7)
0250  fe10      cp      #10
0252  2826      jr      z,#027a         ; (38)
0254  3ab7f0    ld      a,(#f0b7)
0257  4f        ld      c,a
0258  97        sub     a
0259  47        ld      b,a
025a  69        ld      l,c
025b  60        ld      h,b
025c  29        add     hl,hl
025d  29        add     hl,hl
025e  0160f1    ld      bc,#f160
0261  09        add     hl,bc
0262  97        sub     a
0263  77        ld      (hl),a
0264  23        inc     hl
0265  77        ld      (hl),a
0266  3a26f1    ld      a,(#f126)
0269  23        inc     hl
026a  77        ld      (hl),a
026b  97        sub     a
026c  23        inc     hl
026d  77        ld      (hl),a
026e  3e10      ld      a,#10
0270  32b7f0    ld      (#f0b7),a
0273  3e7f      ld      a,#7f
0275  3226f1    ld      (#f126),a
0278  18b0      jr      #022a           ; (-80)
027a  cd6f73    call    #736f
027d  3e7f      ld      a,#7f
027f  3226f1    ld      (#f126),a
0282  18a6      jr      #022a           ; (-90)
0284  2127f1    ld      hl,#f127
0287  3e0f      ld      a,#0f
0289  be        cp      (hl)
028a  daf502    jp      c,#02f5
028d  97        sub     a
028e  3225f1    ld      (#f125),a
0291  3a2af4    ld      a,(#f42a)
0294  dd77f6    ld      (ix-#0a),a
0297  3a2bf4    ld      a,(#f42b)
029a  dd77f7    ld      (ix-#09),a
029d  dd6ef6    ld      l,(ix-#0a)
02a0  dd66f7    ld      h,(ix-#09)
02a3  7e        ld      a,(hl)
02a4  dd77f9    ld      (ix-#07),a
02a7  dd7ef9    ld      a,(ix-#07)
02aa  fe50      cp      #50
02ac  2828      jr      z,#02d6         ; (40)
02ae  dd7ef9    ld      a,(ix-#07)
02b1  fe2b      cp      #2b
02b3  2035      jr      nz,#02ea        ; (53)
02b5  dd6ef6    ld      l,(ix-#0a)
02b8  dd66f7    ld      h,(ix-#09)
02bb  23        inc     hl
02bc  3a27f1    ld      a,(#f127)
02bf  4f        ld      c,a
02c0  7e        ld      a,(hl)
02c1  b9        cp      c
02c2  2026      jr      nz,#02ea        ; (38)
02c4  dd6ef6    ld      l,(ix-#0a)
02c7  dd66f7    ld      h,(ix-#09)
02ca  23        inc     hl
02cb  23        inc     hl
02cc  225df3    ld      (#f35d),hl
02cf  3e1a      ld      a,#1a
02d1  3227f1    ld      (#f127),a
02d4  181f      jr      #02f5           ; (31)
02d6  3a27f1    ld      a,(#f127)
02d9  b7        or      a
02da  202d      jr      nz,#0309        ; (45)
02dc  2a2af4    ld      hl,(#f42a)
02df  23        inc     hl
02e0  225df3    ld      (#f35d),hl
02e3  3e1a      ld      a,#1a
02e5  3227f1    ld      (#f127),a
02e8  181f      jr      #0309           ; (31)
02ea  dd34f6    inc     (ix-#0a)
02ed  2003      jr      nz,#02f2        ; (3)
02ef  dd34f7    inc     (ix-#09)
02f2  c39d02    jp      #029d
02f5  2127f1    ld      hl,#f127
02f8  3e0f      ld      a,#0f
02fa  be        cp      (hl)
02fb  3828      jr      c,#0325         ; (40)
02fd  cd6f73    call    #736f
0300  dd7ef5    ld      a,(ix-#0b)
0303  3225f1    ld      (#f125),a
0306  c3fd01    jp      #01fd
0309  3a27f1    ld      a,(#f127)
030c  fe0f      cp      #0f
030e  20e5      jr      nz,#02f5        ; (-27)
0310  2a4df3    ld      hl,(#f34d)
0313  2255f3    ld      (#f355),hl
0316  cd5f9b    call    #9b5f
0319  69        ld      l,c
031a  60        ld      h,b
031b  225df3    ld      (#f35d),hl
031e  3e1b      ld      a,#1b
0320  3227f1    ld      (#f127),a
0323  18d0      jr      #02f5           ; (-48)
0325  3a27f1    ld      a,(#f127)
0328  87        add     a,a
0329  6f        ld      l,a
032a  4d        ld      c,l
032b  97        sub     a
032c  47        ld      b,a
032d  69        ld      l,c
032e  60        ld      h,b
032f  014f01    ld      bc,#014f
0332  09        add     hl,bc
0333  7e        ld      a,(hl)
0334  23        inc     hl
0335  66        ld      h,(hl)
0336  6f        ld      l,a
0337  cd71be    call    #be71
033a  c3fd01    jp      #01fd
033d  00        nop     
033e  00        nop     
033f  010000    ld      bc,#0000
0342  00        nop     
0343  02        ld      (bc),a
0344  00        nop     
0345  00        nop     
0346  00        nop     
0347  04        inc     b
0348  00        nop     
0349  00        nop     
034a  00        nop     
034b  08        ex      af,af'
034c  00        nop     
034d  00        nop     
034e  00        nop     
034f  1000      djnz    #0351           ; (0)
0351  00        nop     
0352  00        nop     
0353  2000      jr      nz,#0355        ; (0)
0355  00        nop     
0356  00        nop     
0357  40        ld      b,b
0358  00        nop     
0359  00        nop     
035a  00        nop     
035b  80        add     a,b
035c  00        nop     
035d  00        nop     
035e  00        nop     
035f  00        nop     
0360  010000    ld      bc,#0000
0363  00        nop     
0364  02        ld      (bc),a
0365  00        nop     
0366  00        nop     
0367  00        nop     
0368  04        inc     b
0369  00        nop     
036a  00        nop     
036b  00        nop     
036c  08        ex      af,af'
036d  00        nop     
036e  00        nop     
036f  00        nop     
0370  1000      djnz    #0372           ; (0)
0372  00        nop     
0373  00        nop     
0374  2000      jr      nz,#0376        ; (0)
0376  00        nop     
0377  00        nop     
0378  40        ld      b,b
0379  00        nop     
037a  00        nop     
037b  00        nop     
037c  80        add     a,b
037d  010000    ld      bc,#0000
0380  00        nop     
0381  02        ld      (bc),a
0382  00        nop     
0383  00        nop     
0384  00        nop     
0385  04        inc     b
0386  00        nop     
0387  00        nop     
0388  00        nop     
0389  08        ex      af,af'
038a  00        nop     
038b  00        nop     
038c  00        nop     
038d  1000      djnz    #038f           ; (0)
038f  00        nop     
0390  00        nop     
0391  2000      jr      nz,#0393        ; (0)
0393  00        nop     
0394  00        nop     
0395  40        ld      b,b
0396  00        nop     
0397  00        nop     
0398  00        nop     
0399  80        add     a,b
039a  00        nop     
039b  00        nop     
039c  00        nop     
039d  00        nop     
039e  010000    ld      bc,#0000
03a1  00        nop     
03a2  02        ld      (bc),a
03a3  00        nop     
03a4  00        nop     
03a5  00        nop     
03a6  04        inc     b
03a7  00        nop     
03a8  00        nop     
03a9  00        nop     
03aa  08        ex      af,af'
03ab  00        nop     
03ac  00        nop     
03ad  00        nop     
03ae  1000      djnz    #03b0           ; (0)
03b0  00        nop     
03b1  00        nop     
03b2  2000      jr      nz,#03b4        ; (0)
03b4  00        nop     
03b5  00        nop     
03b6  40        ld      b,b
03b7  00        nop     
03b8  00        nop     
03b9  00        nop     
03ba  80        add     a,b
03bb  00        nop     
03bc  00        nop     
03bd  00        nop     
03be  00        nop     
03bf  010000    ld      bc,#0000
03c2  00        nop     
03c3  03        inc     bc
03c4  00        nop     
03c5  00        nop     
03c6  00        nop     
03c7  07        rlca    
03c8  00        nop     
03c9  00        nop     
03ca  00        nop     
03cb  0f        rrca    
03cc  00        nop     
03cd  00        nop     
03ce  00        nop     
03cf  1f        rra     
03d0  00        nop     
03d1  00        nop     
03d2  00        nop     
03d3  3f        ccf     
03d4  00        nop     
03d5  00        nop     
03d6  00        nop     
03d7  7f        ld      a,a
03d8  00        nop     
03d9  00        nop     
03da  00        nop     
03db  ff        rst     #38
03dc  00        nop     
03dd  00        nop     
03de  00        nop     
03df  ff        rst     #38
03e0  010000    ld      bc,#0000
03e3  ff        rst     #38
03e4  03        inc     bc
03e5  00        nop     
03e6  00        nop     
03e7  ff        rst     #38
03e8  07        rlca    
03e9  00        nop     
03ea  00        nop     
03eb  ff        rst     #38
03ec  0f        rrca    
03ed  00        nop     
03ee  00        nop     
03ef  ff        rst     #38
03f0  1f        rra     
03f1  00        nop     
03f2  00        nop     
03f3  ff        rst     #38
03f4  3f        ccf     
03f5  00        nop     
03f6  00        nop     
03f7  ff        rst     #38
03f8  7f        ld      a,a
03f9  00        nop     
03fa  00        nop     
03fb  ff        rst     #38
03fc  ff        rst     #38
03fd  0100ff    ld      bc,#ff00
0400  ff        rst     #38
0401  03        inc     bc
0402  00        nop     
0403  ff        rst     #38
0404  ff        rst     #38
0405  07        rlca    
0406  00        nop     
0407  ff        rst     #38
0408  ff        rst     #38
0409  0f        rrca    
040a  00        nop     
040b  ff        rst     #38
040c  ff        rst     #38
040d  1f        rra     
040e  00        nop     
040f  ff        rst     #38
0410  ff        rst     #38
0411  3f        ccf     
0412  00        nop     
0413  ff        rst     #38
0414  ff        rst     #38
0415  7f        ld      a,a
0416  00        nop     
0417  ff        rst     #38
0418  ff        rst     #38
0419  ff        rst     #38
041a  00        nop     
041b  ff        rst     #38
041c  ff        rst     #38
041d  ff        rst     #38
041e  01ffff    ld      bc,#ffff
0421  ff        rst     #38
0422  03        inc     bc
0423  ff        rst     #38
0424  ff        rst     #38
0425  ff        rst     #38
0426  07        rlca    
0427  ff        rst     #38
0428  ff        rst     #38
0429  ff        rst     #38
042a  0f        rrca    
042b  ff        rst     #38
042c  ff        rst     #38
042d  ff        rst     #38
042e  1f        rra     
042f  ff        rst     #38
0430  ff        rst     #38
0431  ff        rst     #38
0432  3f        ccf     
0433  ff        rst     #38
0434  ff        rst     #38
0435  ff        rst     #38
0436  7f        ld      a,a
0437  ff        rst     #38
0438  ff        rst     #38
0439  ff        rst     #38
043a  ff        rst     #38
043b  ff        rst     #38
043c  ff        rst     #38
043d  ff        rst     #38
043e  ff        rst     #38
043f  ff        rst     #38
0440  ff        rst     #38
0441  00        nop     
0442  00        nop     
0443  00        nop     
0444  00        nop     
0445  8a        adc     a,d
0446  04        inc     b
0447  7f        ld      a,a
0448  04        inc     b
0449  76        halt    
044a  04        inc     b
044b  6f        ld      l,a
044c  04        inc     b
044d  66        ld      h,(hl)
044e  04        inc     b
044f  5d        ld      e,l
0450  04        inc     b
0451  53        ld      d,e
0452  04        inc     b
0453  4c        ld      c,h
0454  49        ld      c,c
0455  4e        ld      c,(hl)
0456  45        ld      b,l
0457  53        ld      d,e
0458  49        ld      c,c
0459  5a        ld      e,d
045a  45        ld      b,l
045b  2000      jr      nz,#045d        ; (0)
045d  4e        ld      c,(hl)
045e  45        ld      b,l
045f  57        ld      d,a
0460  4c        ld      c,h
0461  49        ld      c,c
0462  4e        ld      c,(hl)
0463  45        ld      b,l
0464  2000      jr      nz,#0466        ; (0)
0466  55        ld      d,l
0467  4e        ld      c,(hl)
0468  53        ld      d,e
0469  54        ld      d,h
046a  41        ld      b,c
046b  4c        ld      c,h
046c  4c        ld      c,h
046d  2000      jr      nz,#046f        ; (0)
046f  53        ld      d,e
0470  54        ld      d,h
0471  41        ld      b,c
0472  4c        ld      c,h
0473  4c        ld      c,h
0474  2000      jr      nz,#0476        ; (0)
0476  54        ld      d,h
0477  49        ld      c,c
0478  4d        ld      c,l
0479  45        ld      b,l
047a  4f        ld      c,a
047b  55        ld      d,l
047c  54        ld      d,h
047d  2000      jr      nz,#047f        ; (0)
047f  52        ld      d,d
0480  55        ld      d,l
0481  4e        ld      c,(hl)
0482  2055      jr      nz,#04d9        ; (85)
0484  55        ld      d,l
0485  54        ld      d,h
0486  2040      jr      nz,#04c8        ; (64)
0488  2000      jr      nz,#048a        ; (0)
048a  42        ld      b,d
048b  55        ld      d,l
048c  53        ld      d,e
048d  2054      jr      nz,#04e3        ; (84)
048f  45        ld      b,l
0490  53        ld      d,e
0491  54        ld      d,h
0492  2040      jr      nz,#04d4        ; (64)
0494  2000      jr      nz,#0496        ; (0)
0496  3a0000    ld      a,(#0000)
0499  0a        ld      a,(bc)
049a  0d        dec     c
049b  00        nop     
049c  00        nop     
049d  4f        ld      c,a
049e  00        nop     
049f  00        nop     
04a0  00        nop     
04a1  13        inc     de
04a2  00        nop     
04a3  00        nop     
04a4  00        nop     
04a5  c8        ret     z

04a6  00        nop     
04a7  00        nop     
04a8  00        nop     
04a9  1100f7    ld      de,#f700
04ac  21baf0    ld      hl,#f0ba
04af  e5        push    hl
04b0  219704    ld      hl,#0497
04b3  e5        push    hl
04b4  df        rst     #18
04b5  f1        pop     af
04b6  3e01      ld      a,#01
04b8  32bef0    ld      (#f0be),a
04bb  97        sub     a
04bc  32daf0    ld      (#f0da),a
04bf  3213f1    ld      (#f113),a
04c2  3e01      ld      a,#01
04c4  3215f1    ld      (#f115),a
04c7  97        sub     a
04c8  323ef1    ld      (#f13e),a
04cb  3eef      ld      a,#ef
04cd  3214f1    ld      (#f114),a
04d0  2135f1    ld      hl,#f135
04d3  e5        push    hl
04d4  219b04    ld      hl,#049b
04d7  e5        push    hl
04d8  df        rst     #18
04d9  f1        pop     af
04da  2128f3    ld      hl,#f328
04dd  e5        push    hl
04de  219f04    ld      hl,#049f
04e1  e5        push    hl
04e2  df        rst     #18
04e3  f1        pop     af
04e4  2133f3    ld      hl,#f333
04e7  e5        push    hl
04e8  21a304    ld      hl,#04a3
04eb  e5        push    hl
04ec  df        rst     #18
04ed  f1        pop     af
04ee  2137f3    ld      hl,#f337
04f1  e5        push    hl
04f2  21a704    ld      hl,#04a7
04f5  e5        push    hl
04f6  df        rst     #18
04f7  f1        pop     af
04f8  97        sub     a
04f9  324ff3    ld      (#f34f),a
04fc  3ec0      ld      a,#c0
04fe  3250f3    ld      (#f350),a
0501  21c800    ld      hl,#00c8
0504  e5        push    hl
0505  215ff3    ld      hl,#f35f
0508  cdc3b8    call    #b8c3
050b  210001    ld      hl,#0100
050e  e5        push    hl
050f  2100e8    ld      hl,#e800
0512  cdc3b8    call    #b8c3
0515  97        sub     a
0516  3257f1    ld      (#f157),a
0519  cd1395    call    #9513
051c  c372be    jp      #be72
051f  4f        ld      c,a
0520  4b        ld      c,e
0521  2020      jr      nz,#0543        ; (32)
0523  56        ld      d,(hl)
0524  45        ld      b,l
0525  52        ld      d,d
0526  2d        dec     l
0527  00        nop     
0528  46        ld      b,(hl)
0529  41        ld      b,c
052a  49        ld      c,c
052b  4c        ld      c,h
052c  2020      jr      nz,#054e        ; (32)
052e  00        nop     
052f  2053      jr      nz,#0584        ; (83)
0531  45        ld      b,l
0532  4c        ld      c,h
0533  46        ld      b,(hl)
0534  2d        dec     l
0535  54        ld      d,h
0536  45        ld      b,l
0537  53        ld      d,e
0538  54        ld      d,h
0539  00        nop     
053a  50        ld      d,b
053b  4f        ld      c,a
053c  57        ld      d,a
053d  45        ld      b,l
053e  52        ld      d,d
053f  2d        dec     l
0540  55        ld      d,l
0541  50        ld      d,b
0542  2000      jr      nz,#0544        ; (0)
0544  52        ld      d,d
0545  45        ld      b,l
0546  53        ld      d,e
0547  54        ld      d,h
0548  41        ld      b,c
0549  52        ld      d,d
054a  54        ld      d,h
054b  45        ld      b,l
054c  44        ld      b,h
054d  2000      jr      nz,#054f        ; (0)
054f  46        ld      b,(hl)
0550  4c        ld      c,h
0551  55        ld      d,l
0552  4b        ld      c,e
0553  45        ld      b,l
0554  2039      jr      nz,#058f        ; (57)
0556  3030      jr      nc,#0588        ; (48)
0558  3020      jr      nc,#057a        ; (32)
055a  00        nop     
055b  e7        rst     #20
055c  2ee0      ld      l,#e0
055e  cd4cb5    call    #b54c
0561  2e58      ld      l,#58
0563  cf        rst     #8
0564  2e71      ld      l,#71
0566  cf        rst     #8
0567  214f05    ld      hl,#054f
056a  ef        rst     #28
056b  dd6e04    ld      l,(ix+#04)
056e  cb45      bit     0,l
0570  2806      jr      z,#0578         ; (6)
0572  214405    ld      hl,#0544
0575  ef        rst     #28
0576  1804      jr      #057c           ; (4)
0578  213a05    ld      hl,#053a
057b  ef        rst     #28
057c  212f05    ld      hl,#052f
057f  ef        rst     #28
0580  2e72      ld      l,#72
0582  cf        rst     #8
0583  cd5001    call    #0150
0586  79        ld      a,c
0587  b0        or      b
0588  2808      jr      z,#0592         ; (8)
058a  dd7e04    ld      a,(ix+#04)
058d  f608      or      #08
058f  dd7704    ld      (ix+#04),a
0592  2e71      ld      l,#71
0594  cf        rst     #8
0595  2e5d      ld      l,#5d
0597  cf        rst     #8
0598  dd6e04    ld      l,(ix+#04)
059b  7d        ld      a,l
059c  e60e      and     #0e
059e  280c      jr      z,#05ac         ; (12)
05a0  212805    ld      hl,#0528
05a3  ef        rst     #28
05a4  dd7e04    ld      a,(ix+#04)
05a7  32c7f0    ld      (#f0c7),a
05aa  180a      jr      #05b6           ; (10)
05ac  211f05    ld      hl,#051f
05af  ef        rst     #28
05b0  3a9604    ld      a,(#0496)
05b3  32c7f0    ld      (#f0c7),a
05b6  2e02      ld      l,#02
05b8  e5        push    hl
05b9  2e10      ld      l,#10
05bb  e5        push    hl
05bc  21c5f0    ld      hl,#f0c5
05bf  cdc57f    call    #7fc5
05c2  2e72      ld      l,#72
05c4  cf        rst     #8
05c5  cd6f73    call    #736f
05c8  21d4f0    ld      hl,#f0d4
05cb  e5        push    hl
05cc  213d04    ld      hl,#043d
05cf  e5        push    hl
05d0  df        rst     #18
05d1  f1        pop     af
05d2  3e01      ld      a,#01
05d4  32d8f0    ld      (#f0d8),a
05d7  3e08      ld      a,#08
05d9  32d9f0    ld      (#f0d9),a
05dc  3e7f      ld      a,#7f
05de  3226f1    ld      (#f126),a
05e1  212cf1    ld      hl,#f12c
05e4  e5        push    hl
05e5  214104    ld      hl,#0441
05e8  e5        push    hl
05e9  df        rst     #18
05ea  f1        pop     af
05eb  2130f1    ld      hl,#f130
05ee  e5        push    hl
05ef  214104    ld      hl,#0441
05f2  e5        push    hl
05f3  df        rst     #18
05f4  f1        pop     af
05f5  3e01      ld      a,#01
05f7  3240f1    ld      (#f140),a
05fa  3e0f      ld      a,#0f
05fc  325ef1    ld      (#f15e),a
05ff  3e80      ld      a,#80
0601  325ff1    ld      (#f15f),a
0604  3e01      ld      a,#01
0606  32a0f1    ld      (#f1a0),a
0609  3e02      ld      a,#02
060b  3231f3    ld      (#f331),a
060e  3ab8f0    ld      a,(#f0b8)
0611  e61f      and     #1f
0613  6f        ld      l,a
0614  fe10      cp      #10
0616  2004      jr      nz,#061c        ; (4)
0618  0e01      ld      c,#01
061a  1802      jr      #061e           ; (2)
061c  0e00      ld      c,#00
061e  79        ld      a,c
061f  32b8f0    ld      (#f0b8),a
0622  2e20      ld      l,#20
0624  cd5cba    call    #ba5c
0627  cdab04    call    #04ab
062a  c384be    jp      #be84
062d  f7        rst     #30
062e  f5        push    af
062f  f5        push    af
0630  f5        push    af
0631  f5        push    af
0632  2e58      ld      l,#58
0634  cf        rst     #8
0635  2e1f      ld      l,#1f
0637  d7        rst     #10
0638  2e5b      ld      l,#5b
063a  cf        rst     #8
063b  2e17      ld      l,#17
063d  cd9573    call    #7395
0640  3a27f1    ld      a,(#f127)
0643  fe1e      cp      #1e
0645  2014      jr      nz,#065b        ; (20)
0647  2e5c      ld      l,#5c
0649  cf        rst     #8
064a  2e64      ld      l,#64
064c  d7        rst     #10
064d  2e1e      ld      l,#1e
064f  d7        rst     #10
0650  21b106    ld      hl,#06b1
0653  dd75f8    ld      (ix-#08),l
0656  dd74f9    ld      (ix-#07),h
0659  1827      jr      #0682           ; (39)
065b  cde6b8    call    #b8e6
065e  213d04    ld      hl,#043d
0661  e5        push    hl
0662  214104    ld      hl,#0441
0665  e5        push    hl
0666  2e00      ld      l,#00
0668  e5        push    hl
0669  2e10      ld      l,#10
066b  e5        push    hl
066c  219cf1    ld      hl,#f19c
066f  cd4c78    call    #784c
0672  79        ld      a,c
0673  b7        or      a
0674  2003      jr      nz,#0679        ; (3)
0676  c372be    jp      #be72
0679  211e07    ld      hl,#071e
067c  dd75f8    ld      (ix-#08),l
067f  dd74f9    ld      (ix-#07),h
0682  3a40f1    ld      a,(#f140)
0685  fe02      cp      #02
0687  2809      jr      z,#0692         ; (9)
0689  2e62      ld      l,#62
068b  d7        rst     #10
068c  2e60      ld      l,#60
068e  d7        rst     #10
068f  2e78      ld      l,#78
0691  d7        rst     #10
0692  210000    ld      hl,#0000
0695  e5        push    hl
0696  dd6ef8    ld      l,(ix-#08)
0699  dd66f9    ld      h,(ix-#07)
069c  e5        push    hl
069d  3a40f1    ld      a,(#f140)
06a0  fe03      cp      #03
06a2  2004      jr      nz,#06a8        ; (4)
06a4  0e01      ld      c,#01
06a6  1802      jr      #06aa           ; (2)
06a8  0e00      ld      c,#00
06aa  69        ld      l,c
06ab  cd5188    call    #8851
06ae  c372be    jp      #be72
06b1  e7        rst     #20
06b2  21f7ff    ld      hl,#fff7
06b5  39        add     hl,sp
06b6  f9        ld      sp,hl
06b7  3a14f1    ld      a,(#f114)
06ba  dd77f8    ld      (ix-#08),a
06bd  97        sub     a
06be  3214f1    ld      (#f114),a
06c1  2e08      ld      l,#08
06c3  cd1d8b    call    #8b1d
06c6  dd71f9    ld      (ix-#07),c
06c9  dd7ef9    ld      a,(ix-#07)
06cc  fe02      cp      #02
06ce  281a      jr      z,#06ea         ; (26)
06d0  cdb47f    call    #7fb4
06d3  dd71f7    ld      (ix-#09),c
06d6  dd7ef7    ld      a,(ix-#09)
06d9  fe78      cp      #78
06db  2819      jr      z,#06f6         ; (25)
06dd  2190f1    ld      hl,#f190
06e0  e5        push    hl
06e1  212cf4    ld      hl,#f42c
06e4  e5        push    hl
06e5  cdd9ba    call    #bad9
06e8  200c      jr      nz,#06f6        ; (12)
06ea  dd7ef8    ld      a,(ix-#08)
06ed  3214f1    ld      (#f114),a
06f0  dd4ef9    ld      c,(ix-#07)
06f3  c384be    jp      #be84
06f6  2e71      ld      l,#71
06f8  cf        rst     #8
06f9  2e59      ld      l,#59
06fb  cf        rst     #8
06fc  2e21      ld      l,#21
06fe  e5        push    hl
06ff  2e02      ld      l,#02
0701  e5        push    hl
0702  2190f1    ld      hl,#f190
0705  cdc57f    call    #7fc5
0708  2e63      ld      l,#63
070a  d7        rst     #10
070b  dd6ef7    ld      l,(ix-#09)
070e  d7        rst     #10
070f  2e72      ld      l,#72
0711  cf        rst     #8
0712  212cf4    ld      hl,#f42c
0715  e5        push    hl
0716  2190f1    ld      hl,#f190
0719  e5        push    hl
071a  df        rst     #18
071b  f1        pop     af
071c  18cc      jr      #06ea           ; (-52)
071e  e7        rst     #20
071f  f5        push    af
0720  f5        push    af
0721  f5        push    af
0722  f5        push    af
0723  2e05      ld      l,#05
0725  cd1d8b    call    #8b1d
0728  dd71f9    ld      (ix-#07),c
072b  dd7ef9    ld      a,(ix-#07)
072e  fe02      cp      #02
0730  281a      jr      z,#074c         ; (26)
0732  cdb47f    call    #7fb4
0735  dd71f8    ld      (ix-#08),c
0738  dd7ef8    ld      a,(ix-#08)
073b  fe78      cp      #78
073d  2813      jr      z,#0752         ; (19)
073f  2198f1    ld      hl,#f198
0742  e5        push    hl
0743  2130f4    ld      hl,#f430
0746  e5        push    hl
0747  cdd9ba    call    #bad9
074a  2006      jr      nz,#0752        ; (6)
074c  dd4ef9    ld      c,(ix-#07)
074f  c384be    jp      #be84
0752  2e71      ld      l,#71
0754  cf        rst     #8
0755  2e59      ld      l,#59
0757  cf        rst     #8
0758  3ad8f0    ld      a,(#f0d8)
075b  87        add     a,a
075c  6f        ld      l,a
075d  e5        push    hl
075e  2e10      ld      l,#10
0760  e5        push    hl
0761  2198f1    ld      hl,#f198
0764  cdc57f    call    #7fc5
0767  2e63      ld      l,#63
0769  d7        rst     #10
076a  dd6ef8    ld      l,(ix-#08)
076d  d7        rst     #10
076e  2e72      ld      l,#72
0770  cf        rst     #8
0771  2130f4    ld      hl,#f430
0774  e5        push    hl
0775  2198f1    ld      hl,#f198
0778  e5        push    hl
0779  df        rst     #18
077a  f1        pop     af
077b  18cf      jr      #074c           ; (-49)
077d  f7        rst     #30
077e  21f4ff    ld      hl,#fff4
0781  39        add     hl,sp
0782  f9        ld      sp,hl
0783  2e58      ld      l,#58
0785  cf        rst     #8
0786  2e5b      ld      l,#5b
0788  cf        rst     #8
0789  2e20      ld      l,#20
078b  d7        rst     #10
078c  2e17      ld      l,#17
078e  cd9573    call    #7395
0791  3a27f1    ld      a,(#f127)
0794  fe1e      cp      #1e
0796  2027      jr      nz,#07bf        ; (39)
0798  2e5c      ld      l,#5c
079a  cf        rst     #8
079b  2e65      ld      l,#65
079d  d7        rst     #10
079e  2e1e      ld      l,#1e
07a0  d7        rst     #10
07a1  214008    ld      hl,#0840
07a4  dd75f8    ld      (ix-#08),l
07a7  dd74f9    ld      (ix-#07),h
07aa  2190f1    ld      hl,#f190
07ad  dd75f4    ld      (ix-#0c),l
07b0  dd74f5    ld      (ix-#0b),h
07b3  dd36f702  ld      (ix-#09),#02
07b7  21d903    ld      hl,#03d9
07ba  2234f4    ld      (#f434),hl
07bd  183a      jr      #07f9           ; (58)
07bf  cde6b8    call    #b8e6
07c2  213d04    ld      hl,#043d
07c5  e5        push    hl
07c6  214104    ld      hl,#0441
07c9  e5        push    hl
07ca  2e00      ld      l,#00
07cc  e5        push    hl
07cd  2e10      ld      l,#10
07cf  e5        push    hl
07d0  219cf1    ld      hl,#f19c
07d3  cd4c78    call    #784c
07d6  79        ld      a,c
07d7  b7        or      a
07d8  2003      jr      nz,#07dd        ; (3)
07da  c372be    jp      #be72
07dd  214908    ld      hl,#0849
07e0  dd75f8    ld      (ix-#08),l
07e3  dd74f9    ld      (ix-#07),h
07e6  2198f1    ld      hl,#f198
07e9  dd75f4    ld      (ix-#0c),l
07ec  dd74f5    ld      (ix-#0b),h
07ef  dd36f710  ld      (ix-#09),#10
07f3  21d4f0    ld      hl,#f0d4
07f6  2234f4    ld      (#f434),hl
07f9  2e62      ld      l,#62
07fb  d7        rst     #10
07fc  2a34f4    ld      hl,(#f434)
07ff  e5        push    hl
0800  214104    ld      hl,#0441
0803  e5        push    hl
0804  2e00      ld      l,#00
0806  e5        push    hl
0807  dd6ef7    ld      l,(ix-#09)
080a  e5        push    hl
080b  dd6ef4    ld      l,(ix-#0c)
080e  dd66f5    ld      h,(ix-#0b)
0811  cd4c78    call    #784c
0814  79        ld      a,c
0815  b7        or      a
0816  2825      jr      z,#083d         ; (37)
0818  3a92f1    ld      a,(#f192)
081b  3256f1    ld      (#f156),a
081e  2e7f      ld      l,#7f
0820  d7        rst     #10
0821  210000    ld      hl,#0000
0824  e5        push    hl
0825  dd6ef8    ld      l,(ix-#08)
0828  dd66f9    ld      h,(ix-#07)
082b  e5        push    hl
082c  3a40f1    ld      a,(#f140)
082f  fe03      cp      #03
0831  2004      jr      nz,#0837        ; (4)
0833  0e01      ld      c,#01
0835  1802      jr      #0839           ; (2)
0837  0e00      ld      c,#00
0839  69        ld      l,c
083a  cd5188    call    #8851
083d  c372be    jp      #be72
0840  e7        rst     #20
0841  2e0a      ld      l,#0a
0843  cd1d8b    call    #8b1d
0846  c384be    jp      #be84
0849  e7        rst     #20
084a  2e03      ld      l,#03
084c  cd1d8b    call    #8b1d
084f  c384be    jp      #be84
0852  f7        rst     #30
0853  2e58      ld      l,#58
0855  cf        rst     #8
0856  3a27f1    ld      a,(#f127)
0859  6f        ld      l,a
085a  d7        rst     #10
085b  213d04    ld      hl,#043d
085e  e5        push    hl
085f  214104    ld      hl,#0441
0862  e5        push    hl
0863  2e00      ld      l,#00
0865  e5        push    hl
0866  2e10      ld      l,#10
0868  e5        push    hl
0869  219cf1    ld      hl,#f19c
086c  cd4c78    call    #784c
086f  79        ld      a,c
0870  b7        or      a
0871  cad208    jp      z,#08d2
0874  2e62      ld      l,#62
0876  d7        rst     #10
0877  3ad9f0    ld      a,(#f0d9)
087a  c6ff      add     a,#ff
087c  6f        ld      l,a
087d  323af4    ld      (#f43a),a
0880  87        add     a,a
0881  9f        sbc     a,a
0882  323bf4    ld      (#f43b),a
0885  2a3af4    ld      hl,(#f43a)
0888  29        add     hl,hl
0889  29        add     hl,hl
088a  01bd03    ld      bc,#03bd
088d  09        add     hl,bc
088e  e5        push    hl
088f  214104    ld      hl,#0441
0892  e5        push    hl
0893  2e00      ld      l,#00
0895  e5        push    hl
0896  2e10      ld      l,#10
0898  e5        push    hl
0899  2198f1    ld      hl,#f198
089c  cd4c78    call    #784c
089f  79        ld      a,c
08a0  b7        or      a
08a1  282f      jr      z,#08d2         ; (47)
08a3  2e7f      ld      l,#7f
08a5  d7        rst     #10
08a6  2136f4    ld      hl,#f436
08a9  e5        push    hl
08aa  2a3af4    ld      hl,(#f43a)
08ad  29        add     hl,hl
08ae  29        add     hl,hl
08af  013d03    ld      bc,#033d
08b2  09        add     hl,bc
08b3  e5        push    hl
08b4  df        rst     #18
08b5  f1        pop     af
08b6  210000    ld      hl,#0000
08b9  e5        push    hl
08ba  21db08    ld      hl,#08db
08bd  e5        push    hl
08be  3a40f1    ld      a,(#f140)
08c1  fe03      cp      #03
08c3  2004      jr      nz,#08c9        ; (4)
08c5  0e01      ld      c,#01
08c7  1802      jr      #08cb           ; (2)
08c9  0e00      ld      c,#00
08cb  69        ld      l,c
08cc  cd5188    call    #8851
08cf  c372be    jp      #be72
08d2  0e02      ld      c,#02
08d4  c372be    jp      #be72
08d7  00        nop     
08d8  00        nop     
08d9  00        nop     
08da  00        nop     
08db  e7        rst     #20
08dc  21f7ff    ld      hl,#fff7
08df  39        add     hl,sp
08e0  f9        ld      sp,hl
08e1  dd36f800  ld      (ix-#08),#00
08e5  dd36f900  ld      (ix-#07),#00
08e9  21d9f0    ld      hl,#f0d9
08ec  dd7ef9    ld      a,(ix-#07)
08ef  be        cp      (hl)
08f0  f20709    jp      p,#0907
08f3  2e03      ld      l,#03
08f5  cd1d8b    call    #8b1d
08f8  dd71f7    ld      (ix-#09),c
08fb  dd7ef7    ld      a,(ix-#09)
08fe  fe02      cp      #02
0900  200b      jr      nz,#090d        ; (11)
0902  0e02      ld      c,#02
0904  c384be    jp      #be84
0907  dd4ef8    ld      c,(ix-#08)
090a  c384be    jp      #be84
090d  dd7ef8    ld      a,(ix-#08)
0910  ddb6f7    or      (ix-#09)
0913  dd77f8    ld      (ix-#08),a
0916  2198f1    ld      hl,#f198
0919  e5        push    hl
091a  3a9af1    ld      a,(#f19a)
091d  e601      and     #01
091f  2809      jr      z,#092a         ; (9)
0921  2136f4    ld      hl,#f436
0924  1135f9    ld      de,#f935
0927  ff        rst     #38
0928  1807      jr      #0931           ; (7)
092a  21d708    ld      hl,#08d7
092d  1135f9    ld      de,#f935
0930  ff        rst     #38
0931  2135f9    ld      hl,#f935
0934  e5        push    hl
0935  2198f1    ld      hl,#f198
0938  113df9    ld      de,#f93d
093b  ff        rst     #38
093c  213df9    ld      hl,#f93d
093f  e5        push    hl
0940  210100    ld      hl,#0001
0943  e5        push    hl
0944  cd0fbd    call    #bd0f
0947  cdd4bd    call    #bdd4
094a  df        rst     #18
094b  f1        pop     af
094c  dd34f9    inc     (ix-#07)
094f  c3e908    jp      #08e9
0952  f7        rst     #30
0953  2e58      ld      l,#58
0955  cf        rst     #8
0956  3a27f1    ld      a,(#f127)
0959  6f        ld      l,a
095a  d7        rst     #10
095b  213d04    ld      hl,#043d
095e  e5        push    hl
095f  214104    ld      hl,#0441
0962  e5        push    hl
0963  2e00      ld      l,#00
0965  e5        push    hl
0966  2e10      ld      l,#10
0968  e5        push    hl
0969  219cf1    ld      hl,#f19c
096c  cd4c78    call    #784c
096f  79        ld      a,c
0970  b7        or      a
0971  2836      jr      z,#09a9         ; (54)
0973  2e7f      ld      l,#7f
0975  d7        rst     #10
0976  213cf4    ld      hl,#f43c
0979  e5        push    hl
097a  3ad9f0    ld      a,(#f0d9)
097d  87        add     a,a
097e  87        add     a,a
097f  6f        ld      l,a
0980  4f        ld      c,a
0981  87        add     a,a
0982  9f        sbc     a,a
0983  47        ld      b,a
0984  69        ld      l,c
0985  60        ld      h,b
0986  01b903    ld      bc,#03b9
0989  09        add     hl,bc
098a  e5        push    hl
098b  df        rst     #18
098c  f1        pop     af
098d  210000    ld      hl,#0000
0990  e5        push    hl
0991  21ae09    ld      hl,#09ae
0994  e5        push    hl
0995  3a40f1    ld      a,(#f140)
0998  fe03      cp      #03
099a  2004      jr      nz,#09a0        ; (4)
099c  0e01      ld      c,#01
099e  1802      jr      #09a2           ; (2)
09a0  0e00      ld      c,#00
09a2  69        ld      l,c
09a3  cd5188    call    #8851
09a6  c372be    jp      #be72
09a9  0e02      ld      c,#02
09ab  c372be    jp      #be72
09ae  e7        rst     #20
09af  f5        push    af
09b0  f5        push    af
09b1  f5        push    af
09b2  f5        push    af
09b3  dd36f900  ld      (ix-#07),#00
09b7  97        sub     a
09b8  3298f1    ld      (#f198),a
09bb  3299f1    ld      (#f199),a
09be  329af1    ld      (#f19a),a
09c1  329bf1    ld      (#f19b),a
09c4  2e03      ld      l,#03
09c6  cd1d8b    call    #8b1d
09c9  dd71f8    ld      (ix-#08),c
09cc  dd7ef8    ld      a,(ix-#08)
09cf  fe02      cp      #02
09d1  284e      jr      z,#0a21         ; (78)
09d3  dd7ef9    ld      a,(ix-#07)
09d6  ddb6f8    or      (ix-#08)
09d9  dd77f9    ld      (ix-#07),a
09dc  213cf4    ld      hl,#f43c
09df  e5        push    hl
09e0  2198f1    ld      hl,#f198
09e3  e5        push    hl
09e4  cdd9ba    call    #bad9
09e7  2006      jr      nz,#09ef        ; (6)
09e9  dd4ef9    ld      c,(ix-#07)
09ec  c384be    jp      #be84
09ef  2198f1    ld      hl,#f198
09f2  e5        push    hl
09f3  3e00      ld      a,#00
09f5  87        add     a,a
09f6  9f        sbc     a,a
09f7  3235f9    ld      (#f935),a
09fa  3236f9    ld      (#f936),a
09fd  3e00      ld      a,#00
09ff  3238f9    ld      (#f938),a
0a02  3e01      ld      a,#01
0a04  3237f9    ld      (#f937),a
0a07  2135f9    ld      hl,#f935
0a0a  e5        push    hl
0a0b  cd62ba    call    #ba62
0a0e  f1        pop     af
0a0f  3a9af1    ld      a,(#f19a)
0a12  e61f      and     #1f
0a14  20ae      jr      nz,#09c4        ; (-82)
0a16  2e01      ld      l,#01
0a18  cdceb2    call    #b2ce
0a1b  79        ld      a,c
0a1c  fe02      cp      #02
0a1e  c2c409    jp      nz,#09c4
0a21  0e02      ld      c,#02
0a23  c384be    jp      #be84
0a26  f7        rst     #30
0a27  2e58      ld      l,#58
0a29  cf        rst     #8
0a2a  2e23      ld      l,#23
0a2c  d7        rst     #10
0a2d  213d04    ld      hl,#043d
0a30  e5        push    hl
0a31  214104    ld      hl,#0441
0a34  e5        push    hl
0a35  2e00      ld      l,#00
0a37  e5        push    hl
0a38  2e10      ld      l,#10
0a3a  e5        push    hl
0a3b  219cf1    ld      hl,#f19c
0a3e  cd4c78    call    #784c
0a41  79        ld      a,c
0a42  b7        or      a
0a43  ca920a    jp      z,#0a92
0a46  2e6a      ld      l,#6a
0a48  d7        rst     #10
0a49  3e1f      ld      a,#1f
0a4b  32c7f0    ld      (#f0c7),a
0a4e  21c5f0    ld      hl,#f0c5
0a51  e5        push    hl
0a52  214104    ld      hl,#0441
0a55  e5        push    hl
0a56  2e00      ld      l,#00
0a58  e5        push    hl
0a59  2e0a      ld      l,#0a
0a5b  e5        push    hl
0a5c  2194f1    ld      hl,#f194
0a5f  cd4c78    call    #784c
0a62  79        ld      a,c
0a63  b7        or      a
0a64  282c      jr      z,#0a92         ; (44)
0a66  2e7f      ld      l,#7f
0a68  d7        rst     #10
0a69  213bf3    ld      hl,#f33b
0a6c  e5        push    hl
0a6d  2a96f1    ld      hl,(#f196)
0a70  29        add     hl,hl
0a71  29        add     hl,hl
0a72  013d03    ld      bc,#033d
0a75  09        add     hl,bc
0a76  e5        push    hl
0a77  df        rst     #18
0a78  f1        pop     af
0a79  210000    ld      hl,#0000
0a7c  e5        push    hl
0a7d  21950a    ld      hl,#0a95
0a80  e5        push    hl
0a81  3a40f1    ld      a,(#f140)
0a84  fe03      cp      #03
0a86  2004      jr      nz,#0a8c        ; (4)
0a88  0e01      ld      c,#01
0a8a  1802      jr      #0a8e           ; (2)
0a8c  0e00      ld      c,#00
0a8e  69        ld      l,c
0a8f  cd5188    call    #8851
0a92  c372be    jp      #be72
0a95  e7        rst     #20
0a96  21f9ff    ld      hl,#fff9
0a99  39        add     hl,sp
0a9a  f9        ld      sp,hl
0a9b  2e05      ld      l,#05
0a9d  cd1d8b    call    #8b1d
0aa0  dd71f9    ld      (ix-#07),c
0aa3  dd7ef9    ld      a,(ix-#07)
0aa6  b7        or      a
0aa7  2020      jr      nz,#0ac9        ; (32)
0aa9  219cf1    ld      hl,#f19c
0aac  e5        push    hl
0aad  213bf3    ld      hl,#f33b
0ab0  e5        push    hl
0ab1  cd23be    call    #be23
0ab4  f1        pop     af
0ab5  2e05      ld      l,#05
0ab7  cd1d8b    call    #8b1d
0aba  dd71f9    ld      (ix-#07),c
0abd  219cf1    ld      hl,#f19c
0ac0  e5        push    hl
0ac1  213bf3    ld      hl,#f33b
0ac4  e5        push    hl
0ac5  cd23be    call    #be23
0ac8  f1        pop     af
0ac9  dd4ef9    ld      c,(ix-#07)
0acc  c384be    jp      #be84
0acf  f7        rst     #30
0ad0  21f4ff    ld      hl,#fff4
0ad3  39        add     hl,sp
0ad4  f9        ld      sp,hl
0ad5  2e58      ld      l,#58
0ad7  cf        rst     #8
0ad8  2e24      ld      l,#24
0ada  d7        rst     #10
0adb  2e5b      ld      l,#5b
0add  cf        rst     #8
0ade  2e17      ld      l,#17
0ae0  cd9573    call    #7395
0ae3  3a27f1    ld      a,(#f127)
0ae6  fe1e      cp      #1e
0ae8  202c      jr      nz,#0b16        ; (44)
0aea  2e5c      ld      l,#5c
0aec  cf        rst     #8
0aed  2e65      ld      l,#65
0aef  d7        rst     #10
0af0  2e1e      ld      l,#1e
0af2  d7        rst     #10
0af3  21c90b    ld      hl,#0bc9
0af6  dd75f8    ld      (ix-#08),l
0af9  dd74f9    ld      (ix-#07),h
0afc  2190f1    ld      hl,#f190
0aff  dd75f4    ld      (ix-#0c),l
0b02  dd74f5    ld      (ix-#0b),h
0b05  dd36f702  ld      (ix-#09),#02
0b09  21d903    ld      hl,#03d9
0b0c  2240f4    ld      (#f440),hl
0b0f  3e07      ld      a,#07
0b11  32c7f0    ld      (#f0c7),a
0b14  1844      jr      #0b5a           ; (68)
0b16  cde6b8    call    #b8e6
0b19  213d04    ld      hl,#043d
0b1c  e5        push    hl
0b1d  214104    ld      hl,#0441
0b20  e5        push    hl
0b21  2e00      ld      l,#00
0b23  e5        push    hl
0b24  2e10      ld      l,#10
0b26  e5        push    hl
0b27  219cf1    ld      hl,#f19c
0b2a  cd4c78    call    #784c
0b2d  79        ld      a,c
0b2e  b7        or      a
0b2f  2003      jr      nz,#0b34        ; (3)
0b31  c372be    jp      #be72
0b34  21fb0b    ld      hl,#0bfb
0b37  dd75f8    ld      (ix-#08),l
0b3a  dd74f9    ld      (ix-#07),h
0b3d  2198f1    ld      hl,#f198
0b40  dd75f4    ld      (ix-#0c),l
0b43  dd74f5    ld      (ix-#0b),h
0b46  dd36f710  ld      (ix-#09),#10
0b4a  21d4f0    ld      hl,#f0d4
0b4d  2240f4    ld      (#f440),hl
0b50  3ad9f0    ld      a,(#f0d9)
0b53  c6ff      add     a,#ff
0b55  6f        ld      l,a
0b56  7d        ld      a,l
0b57  32c7f0    ld      (#f0c7),a
0b5a  2e62      ld      l,#62
0b5c  d7        rst     #10
0b5d  2a40f4    ld      hl,(#f440)
0b60  e5        push    hl
0b61  214104    ld      hl,#0441
0b64  e5        push    hl
0b65  2e00      ld      l,#00
0b67  e5        push    hl
0b68  dd6ef7    ld      l,(ix-#09)
0b6b  e5        push    hl
0b6c  dd6ef4    ld      l,(ix-#0c)
0b6f  dd66f5    ld      h,(ix-#0b)
0b72  cd4c78    call    #784c
0b75  79        ld      a,c
0b76  fe01      cp      #01
0b78  c2c60b    jp      nz,#0bc6
0b7b  2e6a      ld      l,#6a
0b7d  d7        rst     #10
0b7e  21c5f0    ld      hl,#f0c5
0b81  e5        push    hl
0b82  214104    ld      hl,#0441
0b85  e5        push    hl
0b86  2e00      ld      l,#00
0b88  e5        push    hl
0b89  2e0a      ld      l,#0a
0b8b  e5        push    hl
0b8c  2194f1    ld      hl,#f194
0b8f  cd4c78    call    #784c
0b92  79        ld      a,c
0b93  fe01      cp      #01
0b95  202f      jr      nz,#0bc6        ; (47)
0b97  213bf3    ld      hl,#f33b
0b9a  e5        push    hl
0b9b  2a96f1    ld      hl,(#f196)
0b9e  29        add     hl,hl
0b9f  29        add     hl,hl
0ba0  013d03    ld      bc,#033d
0ba3  09        add     hl,bc
0ba4  e5        push    hl
0ba5  df        rst     #18
0ba6  f1        pop     af
0ba7  2e7f      ld      l,#7f
0ba9  d7        rst     #10
0baa  210000    ld      hl,#0000
0bad  e5        push    hl
0bae  dd6ef8    ld      l,(ix-#08)
0bb1  dd66f9    ld      h,(ix-#07)
0bb4  e5        push    hl
0bb5  3a40f1    ld      a,(#f140)
0bb8  fe03      cp      #03
0bba  2004      jr      nz,#0bc0        ; (4)
0bbc  0e01      ld      c,#01
0bbe  1802      jr      #0bc2           ; (2)
0bc0  0e00      ld      c,#00
0bc2  69        ld      l,c
0bc3  cd5188    call    #8851
0bc6  c372be    jp      #be72
0bc9  e7        rst     #20
0bca  21f9ff    ld      hl,#fff9
0bcd  39        add     hl,sp
0bce  f9        ld      sp,hl
0bcf  3a92f1    ld      a,(#f192)
0bd2  3256f1    ld      (#f156),a
0bd5  2e0a      ld      l,#0a
0bd7  cd1d8b    call    #8b1d
0bda  dd71f9    ld      (ix-#07),c
0bdd  dd7ef9    ld      a,(ix-#07)
0be0  b7        or      a
0be1  2012      jr      nz,#0bf5        ; (18)
0be3  213df3    ld      hl,#f33d
0be6  3a56f1    ld      a,(#f156)
0be9  ae        xor     (hl)
0bea  3256f1    ld      (#f156),a
0bed  2e0a      ld      l,#0a
0bef  cd1d8b    call    #8b1d
0bf2  dd71f9    ld      (ix-#07),c
0bf5  dd4ef9    ld      c,(ix-#07)
0bf8  c384be    jp      #be84
0bfb  e7        rst     #20
0bfc  21f9ff    ld      hl,#fff9
0bff  39        add     hl,sp
0c00  f9        ld      sp,hl
0c01  2e03      ld      l,#03
0c03  cd1d8b    call    #8b1d
0c06  dd71f9    ld      (ix-#07),c
0c09  dd7ef9    ld      a,(ix-#07)
0c0c  b7        or      a
0c0d  2020      jr      nz,#0c2f        ; (32)
0c0f  2198f1    ld      hl,#f198
0c12  e5        push    hl
0c13  213bf3    ld      hl,#f33b
0c16  e5        push    hl
0c17  cd23be    call    #be23
0c1a  f1        pop     af
0c1b  2e03      ld      l,#03
0c1d  cd1d8b    call    #8b1d
0c20  dd71f9    ld      (ix-#07),c
0c23  2198f1    ld      hl,#f198
0c26  e5        push    hl
0c27  213bf3    ld      hl,#f33b
0c2a  e5        push    hl
0c2b  cd23be    call    #be23
0c2e  f1        pop     af
0c2f  dd4ef9    ld      c,(ix-#07)
0c32  c384be    jp      #be84
0c35  2042      jr      nz,#0c79        ; (66)
0c37  59        ld      e,c
0c38  54        ld      d,h
0c39  45        ld      b,l
0c3a  53        ld      d,e
0c3b  00        nop     
0c3c  43        ld      b,e
0c3d  52        ld      d,d
0c3e  45        ld      b,l
0c3f  41        ld      b,c
0c40  54        ld      d,h
0c41  45        ld      b,l
0c42  44        ld      b,h
0c43  00        nop     
0c44  43        ld      b,e
0c45  52        ld      d,d
0c46  45        ld      b,l
0c47  41        ld      b,c
0c48  54        ld      d,h
0c49  45        ld      b,l
0c4a  2050      jr      nz,#0c9c        ; (80)
0c4c  52        ld      d,d
0c4d  4f        ld      c,a
0c4e  47        ld      b,a
0c4f  00        nop     
0c50  50        ld      d,b
0c51  52        ld      d,d
0c52  4f        ld      c,a
0c53  47        ld      b,a
0c54  52        ld      d,d
0c55  41        ld      b,c
0c56  4d        ld      c,l
0c57  2000      jr      nz,#0c59        ; (0)
0c59  f7        rst     #30
0c5a  21f2ff    ld      hl,#fff2
0c5d  39        add     hl,sp
0c5e  f9        ld      sp,hl
0c5f  2e58      ld      l,#58
0c61  cf        rst     #8
0c62  97        sub     a
0c63  3225f1    ld      (#f125),a
0c66  2a4ff3    ld      hl,(#f34f)
0c69  2227f4    ld      (#f427),hl
0c6c  3a40f1    ld      a,(#f140)
0c6f  fe01      cp      #01
0c71  201c      jr      nz,#0c8f        ; (28)
0c73  21500c    ld      hl,#0c50
0c76  ef        rst     #28
0c77  2e5b      ld      l,#5b
0c79  cf        rst     #8
0c7a  2e17      ld      l,#17
0c7c  cd9573    call    #7395
0c7f  79        ld      a,c
0c80  b7        or      a
0c81  200f      jr      nz,#0c92        ; (15)
0c83  3a27f1    ld      a,(#f127)
0c86  fe2f      cp      #2f
0c88  200b      jr      nz,#0c95        ; (11)
0c8a  cd27a9    call    #a927
0c8d  1803      jr      #0c92           ; (3)
0c8f  cde05b    call    #5be0
0c92  c372be    jp      #be72
0c95  cde6b8    call    #b8e6
0c98  3e63      ld      a,#63
0c9a  32c7f0    ld      (#f0c7),a
0c9d  21c5f0    ld      hl,#f0c5
0ca0  e5        push    hl
0ca1  214104    ld      hl,#0441
0ca4  e5        push    hl
0ca5  2e04      ld      l,#04
0ca7  e5        push    hl
0ca8  2e0a      ld      l,#0a
0caa  e5        push    hl
0cab  212cf1    ld      hl,#f12c
0cae  cd4c78    call    #784c
0cb1  79        ld      a,c
0cb2  fe01      cp      #01
0cb4  20dc      jr      nz,#0c92        ; (-36)
0cb6  3a2ef1    ld      a,(#f12e)
0cb9  3229f4    ld      (#f429),a
0cbc  4f        ld      c,a
0cbd  87        add     a,a
0cbe  9f        sbc     a,a
0cbf  47        ld      b,a
0cc0  69        ld      l,c
0cc1  60        ld      h,b
0cc2  29        add     hl,hl
0cc3  015ff3    ld      bc,#f35f
0cc6  09        add     hl,bc
0cc7  7e        ld      a,(hl)
0cc8  23        inc     hl
0cc9  b6        or      (hl)
0cca  201a      jr      nz,#0ce6        ; (26)
0ccc  3a4ff3    ld      a,(#f34f)
0ccf  d6cf      sub     #cf
0cd1  3a50f3    ld      a,(#f350)
0cd4  dee7      sbc     a,#e7
0cd6  da690d    jp      c,#0d69
0cd9  2e58      ld      l,#58
0cdb  cf        rst     #8
0cdc  2e5f      ld      l,#5f
0cde  d7        rst     #10
0cdf  21440c    ld      hl,#0c44
0ce2  ef        rst     #28
0ce3  c372be    jp      #be72
0ce6  3a29f4    ld      a,(#f429)
0ce9  4f        ld      c,a
0cea  87        add     a,a
0ceb  9f        sbc     a,a
0cec  47        ld      b,a
0ced  69        ld      l,c
0cee  60        ld      h,b
0cef  29        add     hl,hl
0cf0  015ff3    ld      bc,#f35f
0cf3  09        add     hl,bc
0cf4  7e        ld      a,(hl)
0cf5  23        inc     hl
0cf6  66        ld      h,(hl)
0cf7  6f        ld      l,a
0cf8  222af4    ld      (#f42a),hl
0cfb  3a29f4    ld      a,(#f429)
0cfe  6f        ld      l,a
0cff  cd319b    call    #9b31
0d02  dd71f4    ld      (ix-#0c),c
0d05  dd70f5    ld      (ix-#0b),b
0d08  2e71      ld      l,#71
0d0a  cf        rst     #8
0d0b  2a2af4    ld      hl,(#f42a)
0d0e  7e        ld      a,(hl)
0d0f  dd77f8    ld      (ix-#08),a
0d12  dd6ef8    ld      l,(ix-#08)
0d15  d7        rst     #10
0d16  dd6ef4    ld      l,(ix-#0c)
0d19  dd66f5    ld      h,(ix-#0b)
0d1c  ed4b2af4  ld      bc,(#f42a)
0d20  7d        ld      a,l
0d21  91        sub     c
0d22  6f        ld      l,a
0d23  7c        ld      a,h
0d24  98        sbc     a,b
0d25  67        ld      h,a
0d26  2249f3    ld      (#f349),hl
0d29  97        sub     a
0d2a  3247f3    ld      (#f347),a
0d2d  3248f3    ld      (#f348),a
0d30  2e01      ld      l,#01
0d32  e5        push    hl
0d33  2e0a      ld      l,#0a
0d35  e5        push    hl
0d36  2147f3    ld      hl,#f347
0d39  cdc57f    call    #7fc5
0d3c  21350c    ld      hl,#0c35
0d3f  ef        rst     #28
0d40  2e72      ld      l,#72
0d42  cf        rst     #8
0d43  dd7ef8    ld      a,(ix-#08)
0d46  fe51      cp      #51
0d48  c2130e    jp      nz,#0e13
0d4b  2e05      ld      l,#05
0d4d  cd9573    call    #7395
0d50  3a27f1    ld      a,(#f127)
0d53  fe1c      cp      #1c
0d55  2005      jr      nz,#0d5c        ; (5)
0d57  010100    ld      bc,#0001
0d5a  1803      jr      #0d5f           ; (3)
0d5c  010000    ld      bc,#0000
0d5f  79        ld      a,c
0d60  b0        or      b
0d61  ca8d0e    jp      z,#0e8d
0d64  cd6f73    call    #736f
0d67  18e2      jr      #0d4b           ; (-30)
0d69  3a29f4    ld      a,(#f429)
0d6c  4f        ld      c,a
0d6d  87        add     a,a
0d6e  9f        sbc     a,a
0d6f  47        ld      b,a
0d70  69        ld      l,c
0d71  60        ld      h,b
0d72  29        add     hl,hl
0d73  015ff3    ld      bc,#f35f
0d76  09        add     hl,bc
0d77  e5        push    hl
0d78  3a29f4    ld      a,(#f429)
0d7b  6f        ld      l,a
0d7c  cd319b    call    #9b31
0d7f  dd71f2    ld      (ix-#0e),c
0d82  e1        pop     hl
0d83  dd70f3    ld      (ix-#0d),b
0d86  dd7ef2    ld      a,(ix-#0e)
0d89  77        ld      (hl),a
0d8a  dd7ef3    ld      a,(ix-#0d)
0d8d  23        inc     hl
0d8e  77        ld      (hl),a
0d8f  dd6ef2    ld      l,(ix-#0e)
0d92  dd66f3    ld      h,(ix-#0d)
0d95  23        inc     hl
0d96  23        inc     hl
0d97  e5        push    hl
0d98  2a4ff3    ld      hl,(#f34f)
0d9b  01ffff    ld      bc,#ffff
0d9e  09        add     hl,bc
0d9f  e5        push    hl
0da0  dd6ef2    ld      l,(ix-#0e)
0da3  dd66f3    ld      h,(ix-#0d)
0da6  cdd79a    call    #9ad7
0da9  dd6ef2    ld      l,(ix-#0e)
0dac  dd66f3    ld      h,(ix-#0d)
0daf  dd34f2    inc     (ix-#0e)
0db2  2003      jr      nz,#0db7        ; (3)
0db4  dd34f3    inc     (ix-#0d)
0db7  3653      ld      (hl),#53
0db9  dd6ef2    ld      l,(ix-#0e)
0dbc  dd66f3    ld      h,(ix-#0d)
0dbf  3650      ld      (hl),#50
0dc1  3a29f4    ld      a,(#f429)
0dc4  3c        inc     a
0dc5  6f        ld      l,a
0dc6  dd75f7    ld      (ix-#09),l
0dc9  dd7ef7    ld      a,(ix-#09)
0dcc  fe64      cp      #64
0dce  f2fd0d    jp      p,#0dfd
0dd1  dd7ef7    ld      a,(ix-#09)
0dd4  4f        ld      c,a
0dd5  87        add     a,a
0dd6  9f        sbc     a,a
0dd7  47        ld      b,a
0dd8  69        ld      l,c
0dd9  60        ld      h,b
0dda  29        add     hl,hl
0ddb  015ff3    ld      bc,#f35f
0dde  09        add     hl,bc
0ddf  7e        ld      a,(hl)
0de0  23        inc     hl
0de1  b6        or      (hl)
0de2  282a      jr      z,#0e0e         ; (42)
0de4  dd7ef7    ld      a,(ix-#09)
0de7  4f        ld      c,a
0de8  87        add     a,a
0de9  9f        sbc     a,a
0dea  47        ld      b,a
0deb  69        ld      l,c
0dec  60        ld      h,b
0ded  29        add     hl,hl
0dee  015ff3    ld      bc,#f35f
0df1  09        add     hl,bc
0df2  7e        ld      a,(hl)
0df3  c602      add     a,#02
0df5  77        ld      (hl),a
0df6  23        inc     hl
0df7  7e        ld      a,(hl)
0df8  ce00      adc     a,#00
0dfa  77        ld      (hl),a
0dfb  1811      jr      #0e0e           ; (17)
0dfd  2a4ff3    ld      hl,(#f34f)
0e00  23        inc     hl
0e01  23        inc     hl
0e02  224ff3    ld      (#f34f),hl
0e05  2227f4    ld      (#f427),hl
0e08  213c0c    ld      hl,#0c3c
0e0b  ef        rst     #28
0e0c  1805      jr      #0e13           ; (5)
0e0e  dd34f7    inc     (ix-#09)
0e11  18b6      jr      #0dc9           ; (-74)
0e13  3a29f4    ld      a,(#f429)
0e16  4f        ld      c,a
0e17  87        add     a,a
0e18  9f        sbc     a,a
0e19  47        ld      b,a
0e1a  69        ld      l,c
0e1b  60        ld      h,b
0e1c  29        add     hl,hl
0e1d  015ff3    ld      bc,#f35f
0e20  09        add     hl,bc
0e21  7e        ld      a,(hl)
0e22  23        inc     hl
0e23  66        ld      h,(hl)
0e24  6f        ld      l,a
0e25  222af4    ld      (#f42a),hl
0e28  225df3    ld      (#f35d),hl
0e2b  23        inc     hl
0e2c  2255f3    ld      (#f355),hl
0e2f  2a5df3    ld      hl,(#f35d)
0e32  cd219b    call    #9b21
0e35  69        ld      l,c
0e36  60        ld      h,b
0e37  224df3    ld      (#f34d),hl
0e3a  3a29f4    ld      a,(#f429)
0e3d  6f        ld      l,a
0e3e  cd319b    call    #9b31
0e41  69        ld      l,c
0e42  60        ld      h,b
0e43  01ffff    ld      bc,#ffff
0e46  09        add     hl,bc
0e47  2257f3    ld      (#f357),hl
0e4a  21ffe7    ld      hl,#e7ff
0e4d  ed4b4ff3  ld      bc,(#f34f)
0e51  ed5b57f3  ld      de,(#f357)
0e55  79        ld      a,c
0e56  93        sub     e
0e57  4f        ld      c,a
0e58  78        ld      a,b
0e59  9a        sbc     a,d
0e5a  47        ld      b,a
0e5b  7d        ld      a,l
0e5c  91        sub     c
0e5d  6f        ld      l,a
0e5e  7c        ld      a,h
0e5f  98        sbc     a,b
0e60  67        ld      h,a
0e61  23        inc     hl
0e62  23        inc     hl
0e63  225bf3    ld      (#f35b),hl
0e66  e5        push    hl
0e67  2a4ff3    ld      hl,(#f34f)
0e6a  01ffff    ld      bc,#ffff
0e6d  09        add     hl,bc
0e6e  e5        push    hl
0e6f  2a57f3    ld      hl,(#f357)
0e72  23        inc     hl
0e73  cdd79a    call    #9ad7
0e76  2a5bf3    ld      hl,(#f35b)
0e79  01cfff    ld      bc,#ffcf
0e7c  09        add     hl,bc
0e7d  2253f3    ld      (#f353),hl
0e80  3e02      ld      a,#02
0e82  3240f1    ld      (#f140),a
0e85  2e02      ld      l,#02
0e87  cd1fb1    call    #b11f
0e8a  c3920c    jp      #0c92
0e8d  3a27f1    ld      a,(#f127)
0e90  fe1d      cp      #1d
0e92  201c      jr      nz,#0eb0        ; (28)
0e94  2a4ff3    ld      hl,(#f34f)
0e97  01ffff    ld      bc,#ffff
0e9a  09        add     hl,bc
0e9b  e5        push    hl
0e9c  dd6ef4    ld      l,(ix-#0c)
0e9f  dd66f5    ld      h,(ix-#0b)
0ea2  cd95ab    call    #ab95
0ea5  79        ld      a,c
0ea6  b7        or      a
0ea7  200a      jr      nz,#0eb3        ; (10)
0ea9  3e28      ld      a,#28
0eab  3226f1    ld      (#f126),a
0eae  1803      jr      #0eb3           ; (3)
0eb0  cde6b8    call    #b8e6
0eb3  c372be    jp      #be72
0eb6  f7        rst     #30
0eb7  2e58      ld      l,#58
0eb9  cf        rst     #8
0eba  3a40f1    ld      a,(#f140)
0ebd  fe02      cp      #02
0ebf  2019      jr      nz,#0eda        ; (25)
0ec1  2e2b      ld      l,#2b
0ec3  d7        rst     #10
0ec4  2e5b      ld      l,#5b
0ec6  cf        rst     #8
0ec7  2e11      ld      l,#11
0ec9  cd9573    call    #7395
0ecc  79        ld      a,c
0ecd  b7        or      a
0ece  2014      jr      nz,#0ee4        ; (20)
0ed0  3a27f1    ld      a,(#f127)
0ed3  6f        ld      l,a
0ed4  d7        rst     #10
0ed5  cd229a    call    #9a22
0ed8  180d      jr      #0ee7           ; (13)
0eda  2a59f3    ld      hl,(#f359)
0edd  23        inc     hl
0ede  2259f3    ld      (#f359),hl
0ee1  c372be    jp      #be72
0ee4  cde6b8    call    #b8e6
0ee7  2e5c      ld      l,#5c
0ee9  cf        rst     #8
0eea  18f5      jr      #0ee1           ; (-11)
0eec  f7        rst     #30
0eed  f5        push    af
0eee  f5        push    af
0eef  f5        push    af
0ef0  f5        push    af
0ef1  2e58      ld      l,#58
0ef3  cf        rst     #8
0ef4  3a40f1    ld      a,(#f140)
0ef7  fe02      cp      #02
0ef9  2019      jr      nz,#0f14        ; (25)
0efb  2e2c      ld      l,#2c
0efd  d7        rst     #10
0efe  2e5b      ld      l,#5b
0f00  cf        rst     #8
0f01  2e11      ld      l,#11
0f03  cd9573    call    #7395
0f06  79        ld      a,c
0f07  b7        or      a
0f08  203c      jr      nz,#0f46        ; (60)
0f0a  3a27f1    ld      a,(#f127)
0f0d  6f        ld      l,a
0f0e  d7        rst     #10
0f0f  cd229a    call    #9a22
0f12  1835      jr      #0f49           ; (53)
0f14  2a59f3    ld      hl,(#f359)
0f17  7e        ld      a,(hl)
0f18  3227f1    ld      (#f127),a
0f1b  3a51f3    ld      a,(#f351)
0f1e  dd77f8    ld      (ix-#08),a
0f21  3a52f3    ld      a,(#f352)
0f24  dd77f9    ld      (ix-#07),a
0f27  dd6ef8    ld      l,(ix-#08)
0f2a  dd66f9    ld      h,(ix-#07)
0f2d  3a27f1    ld      a,(#f127)
0f30  4f        ld      c,a
0f31  7e        ld      a,(hl)
0f32  b9        cp      c
0f33  2819      jr      z,#0f4e         ; (25)
0f35  dd6ef8    ld      l,(ix-#08)
0f38  dd66f9    ld      h,(ix-#07)
0f3b  23        inc     hl
0f3c  23        inc     hl
0f3d  23        inc     hl
0f3e  dd75f8    ld      (ix-#08),l
0f41  dd74f9    ld      (ix-#07),h
0f44  18e1      jr      #0f27           ; (-31)
0f46  cde6b8    call    #b8e6
0f49  2e5c      ld      l,#5c
0f4b  cf        rst     #8
0f4c  1813      jr      #0f61           ; (19)
0f4e  dd6ef8    ld      l,(ix-#08)
0f51  dd66f9    ld      h,(ix-#07)
0f54  23        inc     hl
0f55  7e        ld      a,(hl)
0f56  23        inc     hl
0f57  66        ld      h,(hl)
0f58  6f        ld      l,a
0f59  ed4b2af4  ld      bc,(#f42a)
0f5d  09        add     hl,bc
0f5e  2259f3    ld      (#f359),hl
0f61  c372be    jp      #be72
0f64  f7        rst     #30
0f65  21f4ff    ld      hl,#fff4
0f68  39        add     hl,sp
0f69  f9        ld      sp,hl
0f6a  2e58      ld      l,#58
0f6c  cf        rst     #8
0f6d  2e2d      ld      l,#2d
0f6f  d7        rst     #10
0f70  213d04    ld      hl,#043d
0f73  e5        push    hl
0f74  214104    ld      hl,#0441
0f77  e5        push    hl
0f78  2e09      ld      l,#09
0f7a  e5        push    hl
0f7b  2e10      ld      l,#10
0f7d  e5        push    hl
0f7e  2143f3    ld      hl,#f343
0f81  cd4c78    call    #784c
0f84  dd71f9    ld      (ix-#07),c
0f87  dd7ef9    ld      a,(ix-#07)
0f8a  fe02      cp      #02
0f8c  2005      jr      nz,#0f93        ; (5)
0f8e  cd6f73    call    #736f
0f91  18dd      jr      #0f70           ; (-35)
0f93  dd7ef9    ld      a,(ix-#07)
0f96  fe01      cp      #01
0f98  2023      jr      nz,#0fbd        ; (35)
0f9a  2e5b      ld      l,#5b
0f9c  cf        rst     #8
0f9d  3a27f1    ld      a,(#f127)
0fa0  fe2e      cp      #2e
0fa2  201c      jr      nz,#0fc0        ; (28)
0fa4  dd36f401  ld      (ix-#0c),#01
0fa8  2e17      ld      l,#17
0faa  cd9573    call    #7395
0fad  3a27f1    ld      a,(#f127)
0fb0  fe2f      cp      #2f
0fb2  203a      jr      nz,#0fee        ; (58)
0fb4  2e2f      ld      l,#2f
0fb6  d7        rst     #10
0fb7  dd36f501  ld      (ix-#0b),#01
0fbb  180b      jr      #0fc8           ; (11)
0fbd  c372be    jp      #be72
0fc0  dd36f400  ld      (ix-#0c),#00
0fc4  dd36f501  ld      (ix-#0b),#01
0fc8  2e63      ld      l,#63
0fca  d7        rst     #10
0fcb  213d04    ld      hl,#043d
0fce  e5        push    hl
0fcf  214104    ld      hl,#0441
0fd2  e5        push    hl
0fd3  2e0a      ld      l,#0a
0fd5  e5        push    hl
0fd6  2e10      ld      l,#10
0fd8  e5        push    hl
0fd9  2147f3    ld      hl,#f347
0fdc  cd4c78    call    #784c
0fdf  dd71f9    ld      (ix-#07),c
0fe2  dd7ef9    ld      a,(ix-#07)
0fe5  fe02      cp      #02
0fe7  200e      jr      nz,#0ff7        ; (14)
0fe9  cd6f73    call    #736f
0fec  18dd      jr      #0fcb           ; (-35)
0fee  cde6b8    call    #b8e6
0ff1  dd36f500  ld      (ix-#0b),#00
0ff5  18d1      jr      #0fc8           ; (-47)
0ff7  dd7ef9    ld      a,(ix-#07)
0ffa  fe01      cp      #01
0ffc  c2bd0f    jp      nz,#0fbd
0fff  2e5b      ld      l,#5b
1001  cf        rst     #8
1002  2e17      ld      l,#17
1004  cd9573    call    #7395
1007  3a27f1    ld      a,(#f127)
100a  e6f0      and     #f0
100c  2015      jr      nz,#1023        ; (21)
100e  2e5c      ld      l,#5c
1010  cf        rst     #8
1011  3a27f1    ld      a,(#f127)
1014  6f        ld      l,a
1015  d7        rst     #10
1016  3a40f1    ld      a,(#f140)
1019  fe02      cp      #02
101b  200c      jr      nz,#1029        ; (12)
101d  cd229a    call    #9a22
1020  c3bd0f    jp      #0fbd
1023  cde6b8    call    #b8e6
1026  c3bd0f    jp      #0fbd
1029  dd7ef4    ld      a,(ix-#0c)
102c  b7        or      a
102d  280d      jr      z,#103c         ; (13)
102f  2147f3    ld      hl,#f347
1032  e5        push    hl
1033  2143f3    ld      hl,#f343
1036  e5        push    hl
1037  cdb0ba    call    #bab0
103a  3815      jr      c,#1051         ; (21)
103c  dd7ef5    ld      a,(ix-#0b)
103f  b7        or      a
1040  cabd0f    jp      z,#0fbd
1043  2143f3    ld      hl,#f343
1046  e5        push    hl
1047  2147f3    ld      hl,#f347
104a  e5        push    hl
104b  cdd9ba    call    #bad9
104e  c2bd0f    jp      nz,#0fbd
1051  3a51f3    ld      a,(#f351)
1054  dd77f6    ld      (ix-#0a),a
1057  3a52f3    ld      a,(#f352)
105a  dd77f7    ld      (ix-#09),a
105d  dd6ef6    ld      l,(ix-#0a)
1060  dd66f7    ld      h,(ix-#09)
1063  3a27f1    ld      a,(#f127)
1066  4f        ld      c,a
1067  7e        ld      a,(hl)
1068  b9        cp      c
1069  2811      jr      z,#107c         ; (17)
106b  dd6ef6    ld      l,(ix-#0a)
106e  dd66f7    ld      h,(ix-#09)
1071  23        inc     hl
1072  23        inc     hl
1073  23        inc     hl
1074  dd75f6    ld      (ix-#0a),l
1077  dd74f7    ld      (ix-#09),h
107a  18e1      jr      #105d           ; (-31)
107c  dd6ef6    ld      l,(ix-#0a)
107f  dd66f7    ld      h,(ix-#09)
1082  23        inc     hl
1083  7e        ld      a,(hl)
1084  23        inc     hl
1085  66        ld      h,(hl)
1086  6f        ld      l,a
1087  ed4b2af4  ld      bc,(#f42a)
108b  09        add     hl,bc
108c  2259f3    ld      (#f359),hl
108f  c3bd0f    jp      #0fbd
1092  46        ld      b,(hl)
1093  41        ld      b,c
1094  54        ld      d,h
1095  41        ld      b,c
1096  4c        ld      c,h
1097  2d        dec     l
1098  00        nop     
1099  41        ld      b,c
109a  54        ld      d,h
109b  54        ld      d,h
109c  45        ld      b,l
109d  4d        ld      c,l
109e  50        ld      d,b
109f  54        ld      d,h
10a0  45        ld      b,l
10a1  44        ld      b,h
10a2  2052      jr      nz,#10f6        ; (82)
10a4  45        ld      b,l
10a5  43        ld      b,e
10a6  55        ld      d,l
10a7  52        ld      d,d
10a8  53        ld      d,e
10a9  49        ld      c,c
10aa  4f        ld      c,a
10ab  4e        ld      c,(hl)
10ac  00        nop     
10ad  50        ld      d,b
10ae  52        ld      d,d
10af  4f        ld      c,a
10b0  47        ld      b,a
10b1  52        ld      d,d
10b2  41        ld      b,c
10b3  4d        ld      c,l
10b4  204e      jr      nz,#1104        ; (78)
10b6  4f        ld      c,a
10b7  54        ld      d,h
10b8  2046      jr      nz,#1100        ; (70)
10ba  4f        ld      c,a
10bb  55        ld      d,l
10bc  4e        ld      c,(hl)
10bd  44        ld      b,h
10be  00        nop     
10bf  2d        dec     l
10c0  204e      jr      nz,#1110        ; (78)
10c2  4f        ld      c,a
10c3  54        ld      d,h
10c4  2046      jr      nz,#110c        ; (70)
10c6  4f        ld      c,a
10c7  55        ld      d,l
10c8  4e        ld      c,(hl)
10c9  44        ld      b,h
10ca  00        nop     
10cb  44        ld      b,h
10cc  45        ld      b,l
10cd  50        ld      d,b
10ce  54        ld      d,h
10cf  48        ld      c,b
10d0  2045      jr      nz,#1117        ; (69)
10d2  58        ld      e,b
10d3  43        ld      b,e
10d4  45        ld      b,l
10d5  45        ld      b,l
10d6  44        ld      b,h
10d7  45        ld      b,l
10d8  44        ld      b,h
10d9  00        nop     
10da  f7        rst     #30
10db  21f1ff    ld      hl,#fff1
10de  39        add     hl,sp
10df  f9        ld      sp,hl
10e0  2e58      ld      l,#58
10e2  cf        rst     #8
10e3  2e37      ld      l,#37
10e5  d7        rst     #10
10e6  3e63      ld      a,#63
10e8  32c7f0    ld      (#f0c7),a
10eb  3a40f1    ld      a,(#f140)
10ee  fe02      cp      #02
10f0  2029      jr      nz,#111b        ; (41)
10f2  21c5f0    ld      hl,#f0c5
10f5  e5        push    hl
10f6  214104    ld      hl,#0441
10f9  e5        push    hl
10fa  2e08      ld      l,#08
10fc  e5        push    hl
10fd  2e0a      ld      l,#0a
10ff  e5        push    hl
1100  2147f3    ld      hl,#f347
1103  cd4c78    call    #784c
1106  dd71f7    ld      (ix-#09),c
1109  dd7ef7    ld      a,(ix-#09)
110c  fe02      cp      #02
110e  2030      jr      nz,#1140        ; (48)
1110  2e5a      ld      l,#5a
1112  cf        rst     #8
1113  2e5a      ld      l,#5a
1115  cf        rst     #8
1116  cd6f73    call    #736f
1119  18d7      jr      #10f2           ; (-41)
111b  2147f3    ld      hl,#f347
111e  e5        push    hl
111f  2130f1    ld      hl,#f130
1122  e5        push    hl
1123  df        rst     #18
1124  f1        pop     af
1125  21c5f0    ld      hl,#f0c5
1128  e5        push    hl
1129  214104    ld      hl,#0441
112c  e5        push    hl
112d  2e00      ld      l,#00
112f  e5        push    hl
1130  2e0a      ld      l,#0a
1132  e5        push    hl
1133  2147f3    ld      hl,#f347
1136  cd4c78    call    #784c
1139  79        ld      a,c
113a  b7        or      a
113b  2012      jr      nz,#114f        ; (18)
113d  c372be    jp      #be72
1140  dd7ef7    ld      a,(ix-#09)
1143  b7        or      a
1144  2003      jr      nz,#1149        ; (3)
1146  c372be    jp      #be72
1149  cd229a    call    #9a22
114c  c3c012    jp      #12c0
114f  3a49f3    ld      a,(#f349)
1152  dd77f5    ld      (ix-#0b),a
1155  3a4bf3    ld      a,(#f34b)
1158  fe0a      cp      #0a
115a  fa6911    jp      m,#1169
115d  21cb10    ld      hl,#10cb
1160  dd75f8    ld      (ix-#08),l
1163  dd74f9    ld      (ix-#07),h
1166  c3d111    jp      #11d1
1169  dd7ef5    ld      a,(ix-#0b)
116c  4f        ld      c,a
116d  87        add     a,a
116e  9f        sbc     a,a
116f  47        ld      b,a
1170  69        ld      l,c
1171  60        ld      h,b
1172  29        add     hl,hl
1173  015ff3    ld      bc,#f35f
1176  09        add     hl,bc
1177  7e        ld      a,(hl)
1178  23        inc     hl
1179  b6        or      (hl)
117a  200e      jr      nz,#118a        ; (14)
117c  3a40f1    ld      a,(#f140)
117f  fe01      cp      #01
1181  201a      jr      nz,#119d        ; (26)
1183  21bf10    ld      hl,#10bf
1186  ef        rst     #28
1187  c3c012    jp      #12c0
118a  3a40f1    ld      a,(#f140)
118d  fe01      cp      #01
118f  2017      jr      nz,#11a8        ; (23)
1191  2130f1    ld      hl,#f130
1194  e5        push    hl
1195  2147f3    ld      hl,#f347
1198  e5        push    hl
1199  df        rst     #18
119a  f1        pop     af
119b  180b      jr      #11a8           ; (11)
119d  21ad10    ld      hl,#10ad
11a0  dd75f8    ld      (ix-#08),l
11a3  dd74f9    ld      (ix-#07),h
11a6  1829      jr      #11d1           ; (41)
11a8  dd36f600  ld      (ix-#0a),#00
11ac  214bf3    ld      hl,#f34b
11af  dd7ef6    ld      a,(ix-#0a)
11b2  be        cp      (hl)
11b3  f21012    jp      p,#1210
11b6  2117f1    ld      hl,#f117
11b9  dd7ef6    ld      a,(ix-#0a)
11bc  5f        ld      e,a
11bd  87        add     a,a
11be  9f        sbc     a,a
11bf  57        ld      d,a
11c0  19        add     hl,de
11c1  7e        ld      a,(hl)
11c2  ddbef5    cp      (ix-#0b)
11c5  c28612    jp      nz,#1286
11c8  219910    ld      hl,#1099
11cb  dd75f8    ld      (ix-#08),l
11ce  dd74f9    ld      (ix-#07),h
11d1  3e01      ld      a,#01
11d3  3240f1    ld      (#f140),a
11d6  2e58      ld      l,#58
11d8  cf        rst     #8
11d9  219210    ld      hl,#1092
11dc  ef        rst     #28
11dd  dd6ef8    ld      l,(ix-#08)
11e0  dd66f9    ld      h,(ix-#07)
11e3  ef        rst     #28
11e4  3a4bf3    ld      a,(#f34b)
11e7  6f        ld      l,a
11e8  3a4bf3    ld      a,(#f34b)
11eb  c601      add     a,#01
11ed  324bf3    ld      (#f34b),a
11f0  7d        ld      a,l
11f1  4f        ld      c,a
11f2  87        add     a,a
11f3  9f        sbc     a,a
11f4  47        ld      b,a
11f5  69        ld      l,c
11f6  60        ld      h,b
11f7  0117f1    ld      bc,#f117
11fa  09        add     hl,bc
11fb  dd7ef5    ld      a,(ix-#0b)
11fe  77        ld      (hl),a
11ff  cd6fa8    call    #a86f
1202  3a26f1    ld      a,(#f126)
1205  3269e9    ld      (#e969),a
1208  3e45      ld      a,#45
120a  3226f1    ld      (#f126),a
120d  c372be    jp      #be72
1210  2117f1    ld      hl,#f117
1213  3a4bf3    ld      a,(#f34b)
1216  5f        ld      e,a
1217  87        add     a,a
1218  9f        sbc     a,a
1219  57        ld      d,a
121a  19        add     hl,de
121b  dd7ef5    ld      a,(ix-#0b)
121e  3229f4    ld      (#f429),a
1221  77        ld      (hl),a
1222  3a29f4    ld      a,(#f429)
1225  4f        ld      c,a
1226  87        add     a,a
1227  9f        sbc     a,a
1228  47        ld      b,a
1229  69        ld      l,c
122a  60        ld      h,b
122b  29        add     hl,hl
122c  015ff3    ld      bc,#f35f
122f  09        add     hl,bc
1230  7e        ld      a,(hl)
1231  23        inc     hl
1232  66        ld      h,(hl)
1233  6f        ld      l,a
1234  222af4    ld      (#f42a),hl
1237  3a40f1    ld      a,(#f140)
123a  fe03      cp      #03
123c  c28c12    jp      nz,#128c
123f  2a2af4    ld      hl,(#f42a)
1242  7e        ld      a,(hl)
1243  fe53      cp      #53
1245  c2c312    jp      nz,#12c3
1248  2160f1    ld      hl,#f160
124b  dd75f2    ld      (ix-#0e),l
124e  dd74f3    ld      (ix-#0d),h
1251  3a4bf3    ld      a,(#f34b)
1254  4f        ld      c,a
1255  87        add     a,a
1256  9f        sbc     a,a
1257  47        ld      b,a
1258  c5        push    bc
1259  212000    ld      hl,#0020
125c  e5        push    hl
125d  cd2dba    call    #ba2d
1260  e1        pop     hl
1261  0181f1    ld      bc,#f181
1264  09        add     hl,bc
1265  e5        push    hl
1266  dd6ef2    ld      l,(ix-#0e)
1269  dd66f3    ld      h,(ix-#0d)
126c  011f00    ld      bc,#001f
126f  09        add     hl,bc
1270  e5        push    hl
1271  dd6ef2    ld      l,(ix-#0e)
1274  dd66f3    ld      h,(ix-#0d)
1277  cdd79a    call    #9ad7
127a  212000    ld      hl,#0020
127d  e5        push    hl
127e  2160f1    ld      hl,#f160
1281  cdc3b8    call    #b8c3
1284  183d      jr      #12c3           ; (61)
1286  dd34f6    inc     (ix-#0a)
1289  c3ac11    jp      #11ac
128c  3e03      ld      a,#03
128e  3240f1    ld      (#f140),a
1291  2e01      ld      l,#01
1293  cd1fb1    call    #b11f
1296  210300    ld      hl,#0003
1299  97        sub     a
129a  3216f1    ld      (#f116),a
129d  22bff0    ld      (#f0bf),hl
12a0  3e10      ld      a,#10
12a2  32b7f0    ld      (#f0b7),a
12a5  3a4bf3    ld      a,(#f34b)
12a8  c601      add     a,#01
12aa  324bf3    ld      (#f34b),a
12ad  2a2af4    ld      hl,(#f42a)
12b0  cd219b    call    #9b21
12b3  69        ld      l,c
12b4  60        ld      h,b
12b5  23        inc     hl
12b6  2251f3    ld      (#f351),hl
12b9  2a2af4    ld      hl,(#f42a)
12bc  23        inc     hl
12bd  2259f3    ld      (#f359),hl
12c0  c372be    jp      #be72
12c3  3a4bf3    ld      a,(#f34b)
12c6  4f        ld      c,a
12c7  87        add     a,a
12c8  9f        sbc     a,a
12c9  47        ld      b,a
12ca  69        ld      l,c
12cb  60        ld      h,b
12cc  29        add     hl,hl
12cd  0141f1    ld      bc,#f141
12d0  09        add     hl,bc
12d1  3a59f3    ld      a,(#f359)
12d4  77        ld      (hl),a
12d5  3a5af3    ld      a,(#f35a)
12d8  23        inc     hl
12d9  77        ld      (hl),a
12da  18c9      jr      #12a5           ; (-55)
12dc  3031      jr      nc,#130f        ; (49)
12de  323334    ld      (#3433),a
12e1  35        dec     (hl)
12e2  3637      ld      (hl),#37
12e4  3839      jr      c,#131f         ; (57)
12e6  41        ld      b,c
12e7  42        ld      b,d
12e8  43        ld      b,e
12e9  44        ld      b,h
12ea  45        ld      b,l
12eb  46        ld      b,(hl)
12ec  27        daa     
12ed  2a2523    ld      hl,(#2325)
12f0  5c        ld      e,h
12f1  22242f    ld      (#2f24),hl
12f4  00        nop     
12f5  00        nop     
12f6  00        nop     
12f7  00        nop     
12f8  00        nop     
12f9  00        nop     
12fa  2047      jr      nz,#1343        ; (71)
12fc  48        ld      c,b
12fd  4c        ld      c,h
12fe  4d        ld      c,l
12ff  51        ld      d,c
1300  52        ld      d,d
1301  56        ld      d,(hl)
1302  3b        dec     sp
1303  2c        inc     l
1304  57        ld      d,a
1305  40        ld      b,b
1306  49        ld      c,c
1307  54        ld      d,h
1308  55        ld      d,l
1309  4e        ld      c,(hl)
130a  4f        ld      c,a
130b  50        ld      d,b
130c  58        ld      e,b
130d  3d        dec     a
130e  59        ld      e,c
130f  3c        inc     a
1310  5a        ld      e,d
1311  3e2d      ld      a,#2d
1313  4a        ld      c,d
1314  2b        dec     hl
1315  3f        ccf     
1316  00        nop     
1317  00        nop     
1318  00        nop     
1319  2e53      ld      l,#53
131b  4b        ld      c,e
131c  0624      ld      b,#24
131e  40        ld      b,b
131f  25        dec     h
1320  2f        cpl     
1321  5c        ld      e,h
1322  3f        ccf     
1323  8c        adc     a,h
1324  15        dec     d
1325  6b        ld      l,e
1326  16c1      ld      d,#c1
1328  15        dec     d
1329  c1        pop     bc
132a  15        dec     d
132b  8f        adc     a,a
132c  15        dec     d
132d  3d        dec     a
132e  15        dec     d
132f  3d        dec     a
1330  15        dec     d
1331  08        ex      af,af'
1332  23        inc     hl
1333  24        inc     h
1334  40        ld      b,b
1335  25        dec     h
1336  2f        cpl     
1337  5c        ld      e,h
1338  3f        ccf     
1339  2b        dec     hl
133a  03        inc     bc
133b  17        rla     
133c  de16      sbc     a,#16
133e  9c        sbc     a,h
133f  14        inc     d
1340  9c        sbc     a,h
1341  14        inc     d
1342  9c        sbc     a,h
1343  14        inc     d
1344  9c        sbc     a,h
1345  14        inc     d
1346  9c        sbc     a,h
1347  14        inc     d
1348  9c        sbc     a,h
1349  14        inc     d
134a  85        add     a,l
134b  14        inc     d
134c  f7        rst     #30
134d  21eeff    ld      hl,#ffee
1350  39        add     hl,sp
1351  f9        ld      sp,hl
1352  3a40f1    ld      a,(#f140)
1355  fe02      cp      #02
1357  2035      jr      nz,#138e        ; (53)
1359  2e58      ld      l,#58
135b  cf        rst     #8
135c  3a27f1    ld      a,(#f127)
135f  6f        ld      l,a
1360  d7        rst     #10
1361  2e5b      ld      l,#5b
1363  cf        rst     #8
1364  dd36f500  ld      (ix-#0b),#00
1368  2e17      ld      l,#17
136a  cd9573    call    #7395
136d  3a27f1    ld      a,(#f127)
1370  fe1c      cp      #1c
1372  2805      jr      z,#1379         ; (5)
1374  010100    ld      bc,#0001
1377  1803      jr      #137c           ; (3)
1379  010000    ld      bc,#0000
137c  79        ld      a,c
137d  b0        or      b
137e  2844      jr      z,#13c4         ; (68)
1380  3a27f1    ld      a,(#f127)
1383  fe1d      cp      #1d
1385  c2d013    jp      nz,#13d0
1388  cde6b8    call    #b8e6
138b  c372be    jp      #be72
138e  3e01      ld      a,#01
1390  3240f1    ld      (#f140),a
1393  dd36f801  ld      (ix-#08),#01
1397  3a27f1    ld      a,(#f127)
139a  fe3f      cp      #3f
139c  2004      jr      nz,#13a2        ; (4)
139e  0e01      ld      c,#01
13a0  1802      jr      #13a4           ; (2)
13a2  0e00      ld      c,#00
13a4  dd71f9    ld      (ix-#07),c
13a7  dd7ef9    ld      a,(ix-#07)
13aa  b7        or      a
13ab  c22b14    jp      nz,#142b
13ae  2e71      ld      l,#71
13b0  cf        rst     #8
13b1  2a59f3    ld      hl,(#f359)
13b4  7e        ld      a,(hl)
13b5  feab      cp      #ab
13b7  c22814    jp      nz,#1428
13ba  2a59f3    ld      hl,(#f359)
13bd  23        inc     hl
13be  2259f3    ld      (#f359),hl
13c1  c32b14    jp      #142b
13c4  2e5c      ld      l,#5c
13c6  cf        rst     #8
13c7  2e74      ld      l,#74
13c9  d7        rst     #10
13ca  cd229a    call    #9a22
13cd  c32217    jp      #1722
13d0  3a27f1    ld      a,(#f127)
13d3  fe1a      cp      #1a
13d5  200c      jr      nz,#13e3        ; (12)
13d7  dd7ef5    ld      a,(ix-#0b)
13da  b7        or      a
13db  2014      jr      nz,#13f1        ; (20)
13dd  cd6f73    call    #736f
13e0  c36813    jp      #1368
13e3  dd7ef5    ld      a,(ix-#0b)
13e6  fe1b      cp      #1b
13e8  fafa13    jp      m,#13fa
13eb  cd6f73    call    #736f
13ee  c36813    jp      #1368
13f1  2e5a      ld      l,#5a
13f3  cf        rst     #8
13f4  dd35f5    dec     (ix-#0b)
13f7  c36813    jp      #1368
13fa  21dc12    ld      hl,#12dc
13fd  3a27f1    ld      a,(#f127)
1400  5f        ld      e,a
1401  97        sub     a
1402  57        ld      d,a
1403  19        add     hl,de
1404  7e        ld      a,(hl)
1405  dd77f6    ld      (ix-#0a),a
1408  dd7ef6    ld      a,(ix-#0a)
140b  b7        or      a
140c  2006      jr      nz,#1414        ; (6)
140e  cd6f73    call    #736f
1411  c36813    jp      #1368
1414  dd7ef6    ld      a,(ix-#0a)
1417  4f        ld      c,a
1418  87        add     a,a
1419  9f        sbc     a,a
141a  47        ld      b,a
141b  69        ld      l,c
141c  60        ld      h,b
141d  7d        ld      a,l
141e  f680      or      #80
1420  6f        ld      l,a
1421  d7        rst     #10
1422  dd34f5    inc     (ix-#0b)
1425  c36813    jp      #1368
1428  2e58      ld      l,#58
142a  cf        rst     #8
142b  3e03      ld      a,#03
142d  3240f1    ld      (#f140),a
1430  2e17      ld      l,#17
1432  cd9573    call    #7395
1435  3e01      ld      a,#01
1437  3240f1    ld      (#f140),a
143a  3a27f1    ld      a,(#f127)
143d  fe74      cp      #74
143f  2805      jr      z,#1446         ; (5)
1441  010100    ld      bc,#0001
1444  1803      jr      #1449           ; (3)
1446  010000    ld      bc,#0000
1449  79        ld      a,c
144a  b0        or      b
144b  2811      jr      z,#145e         ; (17)
144d  97        sub     a
144e  32b9f0    ld      (#f0b9),a
1451  3a27f1    ld      a,(#f127)
1454  fe45      cp      #45
1456  201a      jr      nz,#1472        ; (26)
1458  cde6b8    call    #b8e6
145b  c372be    jp      #be72
145e  dd7ef9    ld      a,(ix-#07)
1461  b7        or      a
1462  ca1a17    jp      z,#171a
1465  dd7ef8    ld      a,(ix-#08)
1468  b7        or      a
1469  ca1d17    jp      z,#171d
146c  cde1a5    call    #a5e1
146f  c31d17    jp      #171d
1472  3a27f1    ld      a,(#f127)
1475  e67f      and     #7f
1477  6f        ld      l,a
1478  dd75f6    ld      (ix-#0a),l
147b  dd6ef6    ld      l,(ix-#0a)
147e  4d        ld      c,l
147f  213113    ld      hl,#1331
1482  c3edb8    jp      #b8ed
1485  dd7ef9    ld      a,(ix-#07)
1488  b7        or      a
1489  2808      jr      z,#1493         ; (8)
148b  2e07      ld      l,#07
148d  cd61a6    call    #a661
1490  c32b14    jp      #142b
1493  cd6f73    call    #736f
1496  c32b14    jp      #142b
1499  c32b14    jp      #142b
149c  dd7ef6    ld      a,(ix-#0a)
149f  dd77ee    ld      (ix-#12),a
14a2  2a59f3    ld      hl,(#f359)
14a5  e5        push    hl
14a6  23        inc     hl
14a7  2259f3    ld      (#f359),hl
14aa  e1        pop     hl
14ab  7e        ld      a,(hl)
14ac  3227f1    ld      (#f127),a
14af  e67f      and     #7f
14b1  6f        ld      l,a
14b2  dd75f6    ld      (ix-#0a),l
14b5  dd7ef6    ld      a,(ix-#0a)
14b8  ddbeee    cp      (ix-#12)
14bb  200f      jr      nz,#14cc        ; (15)
14bd  dd7ef9    ld      a,(ix-#07)
14c0  b7        or      a
14c1  282b      jr      z,#14ee         ; (43)
14c3  dd6eee    ld      l,(ix-#12)
14c6  cd61a6    call    #a661
14c9  c32b14    jp      #142b
14cc  dd7ef6    ld      a,(ix-#0a)
14cf  fe30      cp      #30
14d1  fafd14    jp      m,#14fd
14d4  3e46      ld      a,#46
14d6  ddbef6    cp      (ix-#0a)
14d9  fafd14    jp      m,#14fd
14dc  3e39      ld      a,#39
14de  ddbef6    cp      (ix-#0a)
14e1  f20f15    jp      p,#150f
14e4  dd7ef6    ld      a,(ix-#0a)
14e7  fe41      cp      #41
14e9  f20f15    jp      p,#150f
14ec  180f      jr      #14fd           ; (15)
14ee  dd4eee    ld      c,(ix-#12)
14f1  97        sub     a
14f2  47        ld      b,a
14f3  69        ld      l,c
14f4  60        ld      h,b
14f5  7d        ld      a,l
14f6  f680      or      #80
14f8  6f        ld      l,a
14f9  d7        rst     #10
14fa  c32b14    jp      #142b
14fd  cde6b8    call    #b8e6
1500  dd7ef9    ld      a,(ix-#07)
1503  b7        or      a
1504  2828      jr      z,#152e         ; (40)
1506  dd6eee    ld      l,(ix-#12)
1509  cd61a6    call    #a661
150c  c32b14    jp      #142b
150f  3e39      ld      a,#39
1511  ddbef6    cp      (ix-#0a)
1514  fa1b15    jp      m,#151b
1517  0e30      ld      c,#30
1519  1802      jr      #151d           ; (2)
151b  0e37      ld      c,#37
151d  dd7ef6    ld      a,(ix-#0a)
1520  91        sub     c
1521  dd77f6    ld      (ix-#0a),a
1524  dd6eee    ld      l,(ix-#12)
1527  4d        ld      c,l
1528  211c13    ld      hl,#131c
152b  c3edb8    jp      #b8ed
152e  dd4eee    ld      c,(ix-#12)
1531  97        sub     a
1532  47        ld      b,a
1533  69        ld      l,c
1534  60        ld      h,b
1535  7d        ld      a,l
1536  f680      or      #80
1538  6f        ld      l,a
1539  d7        rst     #10
153a  c32b14    jp      #142b
153d  dd7eee    ld      a,(ix-#12)
1540  fe24      cp      #24
1542  2006      jr      nz,#154a        ; (6)
1544  dd36f710  ld      (ix-#09),#10
1548  1804      jr      #154e           ; (4)
154a  dd36f70a  ld      (ix-#09),#0a
154e  dd7ef9    ld      a,(ix-#07)
1551  b7        or      a
1552  281c      jr      z,#1570         ; (28)
1554  2e01      ld      l,#01
1556  e5        push    hl
1557  dd6ef7    ld      l,(ix-#09)
155a  e5        push    hl
155b  dd7ef6    ld      a,(ix-#0a)
155e  4f        ld      c,a
155f  87        add     a,a
1560  9f        sbc     a,a
1561  47        ld      b,a
1562  69        ld      l,c
1563  60        ld      h,b
1564  29        add     hl,hl
1565  29        add     hl,hl
1566  0160f1    ld      bc,#f160
1569  09        add     hl,bc
156a  cd31aa    call    #aa31
156d  c32b14    jp      #142b
1570  2e01      ld      l,#01
1572  e5        push    hl
1573  dd6ef7    ld      l,(ix-#09)
1576  e5        push    hl
1577  dd7ef6    ld      a,(ix-#0a)
157a  4f        ld      c,a
157b  87        add     a,a
157c  9f        sbc     a,a
157d  47        ld      b,a
157e  69        ld      l,c
157f  60        ld      h,b
1580  29        add     hl,hl
1581  29        add     hl,hl
1582  0160f1    ld      bc,#f160
1585  09        add     hl,bc
1586  cdc57f    call    #7fc5
1589  c32b14    jp      #142b
158c  c32b14    jp      #142b
158f  dd7ef9    ld      a,(ix-#07)
1592  b7        or      a
1593  2816      jr      z,#15ab         ; (22)
1595  dd7ef6    ld      a,(ix-#0a)
1598  4f        ld      c,a
1599  87        add     a,a
159a  9f        sbc     a,a
159b  47        ld      b,a
159c  69        ld      l,c
159d  60        ld      h,b
159e  29        add     hl,hl
159f  29        add     hl,hl
15a0  0162f1    ld      bc,#f162
15a3  09        add     hl,bc
15a4  6e        ld      l,(hl)
15a5  cd61a6    call    #a661
15a8  c32b14    jp      #142b
15ab  3ab7f0    ld      a,(#f0b7)
15ae  ddbef6    cp      (ix-#0a)
15b1  2004      jr      nz,#15b7        ; (4)
15b3  0e10      ld      c,#10
15b5  1803      jr      #15ba           ; (3)
15b7  dd4ef6    ld      c,(ix-#0a)
15ba  79        ld      a,c
15bb  32b7f0    ld      (#f0b7),a
15be  c32b14    jp      #142b
15c1  dd7ef9    ld      a,(ix-#07)
15c4  b7        or      a
15c5  2840      jr      z,#1607         ; (64)
15c7  dd7ef6    ld      a,(ix-#0a)
15ca  4f        ld      c,a
15cb  87        add     a,a
15cc  9f        sbc     a,a
15cd  47        ld      b,a
15ce  69        ld      l,c
15cf  60        ld      h,b
15d0  29        add     hl,hl
15d1  29        add     hl,hl
15d2  0160f1    ld      bc,#f160
15d5  09        add     hl,bc
15d6  e5        push    hl
15d7  214104    ld      hl,#0441
15da  e5        push    hl
15db  df        rst     #18
15dc  f1        pop     af
15dd  dd7eee    ld      a,(ix-#12)
15e0  fe2f      cp      #2f
15e2  c24b16    jp      nz,#164b
15e5  3e03      ld      a,#03
15e7  3240f1    ld      (#f140),a
15ea  dd7ef6    ld      a,(ix-#0a)
15ed  4f        ld      c,a
15ee  87        add     a,a
15ef  9f        sbc     a,a
15f0  47        ld      b,a
15f1  69        ld      l,c
15f2  60        ld      h,b
15f3  29        add     hl,hl
15f4  29        add     hl,hl
15f5  0162f1    ld      bc,#f162
15f8  09        add     hl,bc
15f9  e5        push    hl
15fa  cd90a6    call    #a690
15fd  e1        pop     hl
15fe  71        ld      (hl),c
15ff  3e01      ld      a,#01
1601  3240f1    ld      (#f140),a
1604  c32b14    jp      #142b
1607  2e72      ld      l,#72
1609  cf        rst     #8
160a  3a34f1    ld      a,(#f134)
160d  dd77f3    ld      (ix-#0d),a
1610  2e04      ld      l,#04
1612  cd1fb1    call    #b11f
1615  2e08      ld      l,#08
1617  cd36b1    call    #b136
161a  dd7eee    ld      a,(ix-#12)
161d  fe2f      cp      #2f
161f  2004      jr      nz,#1625        ; (4)
1621  0e10      ld      c,#10
1623  1802      jr      #1627           ; (2)
1625  0e0a      ld      c,#0a
1627  c5        push    bc
1628  dd7ef6    ld      a,(ix-#0a)
162b  4f        ld      c,a
162c  87        add     a,a
162d  9f        sbc     a,a
162e  47        ld      b,a
162f  69        ld      l,c
1630  60        ld      h,b
1631  29        add     hl,hl
1632  29        add     hl,hl
1633  0160f1    ld      bc,#f160
1636  09        add     hl,bc
1637  cde5a4    call    #a4e5
163a  2e04      ld      l,#04
163c  cd36b1    call    #b136
163f  dd6ef3    ld      l,(ix-#0d)
1642  cd1fb1    call    #b11f
1645  2e71      ld      l,#71
1647  cf        rst     #8
1648  c32b14    jp      #142b
164b  dd7ef6    ld      a,(ix-#0a)
164e  4f        ld      c,a
164f  87        add     a,a
1650  9f        sbc     a,a
1651  47        ld      b,a
1652  69        ld      l,c
1653  60        ld      h,b
1654  29        add     hl,hl
1655  29        add     hl,hl
1656  0162f1    ld      bc,#f162
1659  09        add     hl,bc
165a  e5        push    hl
165b  2ee2      ld      l,#e2
165d  cd5cba    call    #ba5c
1660  79        ld      a,c
1661  e61f      and     #1f
1663  4f        ld      c,a
1664  e1        pop     hl
1665  97        sub     a
1666  47        ld      b,a
1667  71        ld      (hl),c
1668  c32b14    jp      #142b
166b  dd7ef9    ld      a,(ix-#07)
166e  b7        or      a
166f  2808      jr      z,#1679         ; (8)
1671  2e3f      ld      l,#3f
1673  cd61a6    call    #a661
1676  c32b14    jp      #142b
1679  21bf00    ld      hl,#00bf
167c  d7        rst     #10
167d  2e72      ld      l,#72
167f  cf        rst     #8
1680  3a34f1    ld      a,(#f134)
1683  dd77f3    ld      (ix-#0d),a
1686  2e04      ld      l,#04
1688  cd1fb1    call    #b11f
168b  2e08      ld      l,#08
168d  cd36b1    call    #b136
1690  218500    ld      hl,#0085
1693  cd9573    call    #7395
1696  79        ld      a,c
1697  b7        or      a
1698  2030      jr      nz,#16ca        ; (48)
169a  dd7ef6    ld      a,(ix-#0a)
169d  4f        ld      c,a
169e  87        add     a,a
169f  9f        sbc     a,a
16a0  47        ld      b,a
16a1  69        ld      l,c
16a2  60        ld      h,b
16a3  29        add     hl,hl
16a4  29        add     hl,hl
16a5  0160f1    ld      bc,#f160
16a8  09        add     hl,bc
16a9  e5        push    hl
16aa  3a27f1    ld      a,(#f127)
16ad  fe1c      cp      #1c
16af  2004      jr      nz,#16b5        ; (4)
16b1  0e01      ld      c,#01
16b3  1802      jr      #16b7           ; (2)
16b5  0e00      ld      c,#00
16b7  e1        pop     hl
16b8  79        ld      a,c
16b9  23        inc     hl
16ba  23        inc     hl
16bb  77        ld      (hl),a
16bc  87        add     a,a
16bd  9f        sbc     a,a
16be  23        inc     hl
16bf  77        ld      (hl),a
16c0  2b        dec     hl
16c1  2b        dec     hl
16c2  77        ld      (hl),a
16c3  2b        dec     hl
16c4  77        ld      (hl),a
16c5  2e5a      ld      l,#5a
16c7  cf        rst     #8
16c8  1803      jr      #16cd           ; (3)
16ca  cde6b8    call    #b8e6
16cd  2e04      ld      l,#04
16cf  cd36b1    call    #b136
16d2  dd6ef3    ld      l,(ix-#0d)
16d5  cd1fb1    call    #b11f
16d8  2e71      ld      l,#71
16da  cf        rst     #8
16db  c32b14    jp      #142b
16de  dd7ef9    ld      a,(ix-#07)
16e1  b7        or      a
16e2  280f      jr      z,#16f3         ; (15)
16e4  2a59f3    ld      hl,(#f359)
16e7  7e        ld      a,(hl)
16e8  fe74      cp      #74
16ea  200f      jr      nz,#16fb        ; (15)
16ec  dd36f800  ld      (ix-#08),#00
16f0  c32b14    jp      #142b
16f3  3a27f1    ld      a,(#f127)
16f6  6f        ld      l,a
16f7  d7        rst     #10
16f8  c32b14    jp      #142b
16fb  2e2b      ld      l,#2b
16fd  cd61a6    call    #a661
1700  c32b14    jp      #142b
1703  dd7ef9    ld      a,(ix-#07)
1706  b7        or      a
1707  2809      jr      z,#1712         ; (9)
1709  dd6ef6    ld      l,(ix-#0a)
170c  cd61a6    call    #a661
170f  c32b14    jp      #142b
1712  3a27f1    ld      a,(#f127)
1715  6f        ld      l,a
1716  d7        rst     #10
1717  c32b14    jp      #142b
171a  2e72      ld      l,#72
171c  cf        rst     #8
171d  3e03      ld      a,#03
171f  3240f1    ld      (#f140),a
1722  c372be    jp      #be72
1725  f7        rst     #30
1726  f5        push    af
1727  f5        push    af
1728  f5        push    af
1729  f5        push    af
172a  3a4bf3    ld      a,(#f34b)
172d  d601      sub     #01
172f  324bf3    ld      (#f34b),a
1732  b7        or      a
1733  2016      jr      nz,#174b        ; (22)
1735  3a16f1    ld      a,(#f116)
1738  b7        or      a
1739  ca8917    jp      z,#1789
173c  3e01      ld      a,#01
173e  324bf3    ld      (#f34b),a
1741  2a2af4    ld      hl,(#f42a)
1744  23        inc     hl
1745  2259f3    ld      (#f359),hl
1748  c31918    jp      #1819
174b  2a2af4    ld      hl,(#f42a)
174e  7e        ld      a,(hl)
174f  fe53      cp      #53
1751  c2d817    jp      nz,#17d8
1754  3a4bf3    ld      a,(#f34b)
1757  4f        ld      c,a
1758  87        add     a,a
1759  9f        sbc     a,a
175a  47        ld      b,a
175b  c5        push    bc
175c  212000    ld      hl,#0020
175f  e5        push    hl
1760  cd2dba    call    #ba2d
1763  e1        pop     hl
1764  0181f1    ld      bc,#f181
1767  09        add     hl,bc
1768  dd75f8    ld      (ix-#08),l
176b  dd74f9    ld      (ix-#07),h
176e  2160f1    ld      hl,#f160
1771  e5        push    hl
1772  dd6ef8    ld      l,(ix-#08)
1775  dd66f9    ld      h,(ix-#07)
1778  011f00    ld      bc,#001f
177b  09        add     hl,bc
177c  e5        push    hl
177d  dd6ef8    ld      l,(ix-#08)
1780  dd66f9    ld      h,(ix-#07)
1783  cdd79a    call    #9ad7
1786  c3d817    jp      #17d8
1789  2e01      ld      l,#01
178b  cd36b1    call    #b136
178e  3e01      ld      a,#01
1790  3240f1    ld      (#f140),a
1793  2e0f      ld      l,#0f
1795  cd9573    call    #7395
1798  3a27f1    ld      a,(#f127)
179b  fe27      cp      #27
179d  200a      jr      nz,#17a9        ; (10)
179f  3e01      ld      a,#01
17a1  3216f1    ld      (#f116),a
17a4  2e08      ld      l,#08
17a6  cd1fb1    call    #b11f
17a9  3a27f1    ld      a,(#f127)
17ac  fe26      cp      #26
17ae  2806      jr      z,#17b6         ; (6)
17b0  3a16f1    ld      a,(#f116)
17b3  b7        or      a
17b4  281d      jr      z,#17d3         ; (29)
17b6  2e01      ld      l,#01
17b8  cd1fb1    call    #b11f
17bb  3e03      ld      a,#03
17bd  3240f1    ld      (#f140),a
17c0  3e01      ld      a,#01
17c2  324bf3    ld      (#f34b),a
17c5  2a2af4    ld      hl,(#f42a)
17c8  23        inc     hl
17c9  2259f3    ld      (#f359),hl
17cc  3e10      ld      a,#10
17ce  32b7f0    ld      (#f0b7),a
17d1  1846      jr      #1819           ; (70)
17d3  cde6b8    call    #b8e6
17d6  1841      jr      #1819           ; (65)
17d8  3a4bf3    ld      a,(#f34b)
17db  4f        ld      c,a
17dc  87        add     a,a
17dd  9f        sbc     a,a
17de  47        ld      b,a
17df  69        ld      l,c
17e0  60        ld      h,b
17e1  0116f1    ld      bc,#f116
17e4  09        add     hl,bc
17e5  7e        ld      a,(hl)
17e6  3229f4    ld      (#f429),a
17e9  4f        ld      c,a
17ea  87        add     a,a
17eb  9f        sbc     a,a
17ec  47        ld      b,a
17ed  69        ld      l,c
17ee  60        ld      h,b
17ef  29        add     hl,hl
17f0  015ff3    ld      bc,#f35f
17f3  09        add     hl,bc
17f4  7e        ld      a,(hl)
17f5  23        inc     hl
17f6  66        ld      h,(hl)
17f7  6f        ld      l,a
17f8  222af4    ld      (#f42a),hl
17fb  cd219b    call    #9b21
17fe  69        ld      l,c
17ff  60        ld      h,b
1800  23        inc     hl
1801  2251f3    ld      (#f351),hl
1804  3a4bf3    ld      a,(#f34b)
1807  4f        ld      c,a
1808  87        add     a,a
1809  9f        sbc     a,a
180a  47        ld      b,a
180b  69        ld      l,c
180c  60        ld      h,b
180d  29        add     hl,hl
180e  0141f1    ld      bc,#f141
1811  09        add     hl,bc
1812  7e        ld      a,(hl)
1813  23        inc     hl
1814  66        ld      h,(hl)
1815  6f        ld      l,a
1816  2259f3    ld      (#f359),hl
1819  c372be    jp      #be72
181c  f7        rst     #30
181d  2e58      ld      l,#58
181f  cf        rst     #8
1820  3a40f1    ld      a,(#f140)
1823  fe02      cp      #02
1825  2008      jr      nz,#182f        ; (8)
1827  2e28      ld      l,#28
1829  d7        rst     #10
182a  cd229a    call    #9a22
182d  1838      jr      #1867           ; (56)
182f  3a40f1    ld      a,(#f140)
1832  fe01      cp      #01
1834  2005      jr      nz,#183b        ; (5)
1836  2e4c      ld      l,#4c
1838  d7        rst     #10
1839  182c      jr      #1867           ; (44)
183b  2e04      ld      l,#04
183d  cd1fb1    call    #b11f
1840  2e42      ld      l,#42
1842  cd7c76    call    #767c
1845  79        ld      a,c
1846  b7        or      a
1847  28f7      jr      z,#1840         ; (-9)
1849  3a26f1    ld      a,(#f126)
184c  fe25      cp      #25
184e  2007      jr      nz,#1857        ; (7)
1850  3e7f      ld      a,#7f
1852  3226f1    ld      (#f126),a
1855  180b      jr      #1862           ; (11)
1857  3a26f1    ld      a,(#f126)
185a  3269e9    ld      (#e969),a
185d  3e45      ld      a,#45
185f  3226f1    ld      (#f126),a
1862  2e04      ld      l,#04
1864  cd36b1    call    #b136
1867  c372be    jp      #be72
186a  f7        rst     #30
186b  3a69e9    ld      a,(#e969)
186e  3226f1    ld      (#f126),a
1871  97        sub     a
1872  324bf3    ld      (#f34b),a
1875  3216f1    ld      (#f116),a
1878  3a40f1    ld      a,(#f140)
187b  fe03      cp      #03
187d  2005      jr      nz,#1884        ; (5)
187f  3e01      ld      a,#01
1881  3240f1    ld      (#f140),a
1884  2e09      ld      l,#09
1886  cd36b1    call    #b136
1889  2e72      ld      l,#72
188b  cf        rst     #8
188c  97        sub     a
188d  3225f1    ld      (#f125),a
1890  c372be    jp      #be72
1893  f7        rst     #30
1894  2a2af4    ld      hl,(#f42a)
1897  e5        push    hl
1898  ed4bbff0  ld      bc,(#f0bf)
189c  09        add     hl,bc
189d  4d        ld      c,l
189e  44        ld      b,h
189f  e1        pop     hl
18a0  cd1eb9    call    #b91e
18a3  69        ld      l,c
18a4  60        ld      h,b
18a5  22bff0    ld      (#f0bf),hl
18a8  7c        ld      a,h
18a9  b5        or      l
18aa  281c      jr      z,#18c8         ; (28)
18ac  2e81      ld      l,#81
18ae  cd5cba    call    #ba5c
18b1  cb41      bit     0,c
18b3  28df      jr      z,#1894         ; (-33)
18b5  3a59f3    ld      a,(#f359)
18b8  d601      sub     #01
18ba  3259f3    ld      (#f359),a
18bd  3a5af3    ld      a,(#f35a)
18c0  de00      sbc     a,#00
18c2  325af3    ld      (#f35a),a
18c5  c372be    jp      #be72
18c8  210300    ld      hl,#0003
18cb  22bff0    ld      (#f0bf),hl
18ce  c372be    jp      #be72
18d1  f7        rst     #30
18d2  2e58      ld      l,#58
18d4  cf        rst     #8
18d5  2e14      ld      l,#14
18d7  d7        rst     #10
18d8  2e7f      ld      l,#7f
18da  d7        rst     #10
18db  210000    ld      hl,#0000
18de  e5        push    hl
18df  21f718    ld      hl,#18f7
18e2  e5        push    hl
18e3  3a40f1    ld      a,(#f140)
18e6  fe03      cp      #03
18e8  2004      jr      nz,#18ee        ; (4)
18ea  0e01      ld      c,#01
18ec  1802      jr      #18f0           ; (2)
18ee  0e00      ld      c,#00
18f0  69        ld      l,c
18f1  cd5188    call    #8851
18f4  c372be    jp      #be72
18f7  e7        rst     #20
18f8  f5        push    af
18f9  f5        push    af
18fa  f5        push    af
18fb  f5        push    af
18fc  dd36f900  ld      (ix-#07),#00
1900  2e01      ld      l,#01
1902  cd861a    call    #1a86
1905  dd71f8    ld      (ix-#08),c
1908  dd7ef8    ld      a,(ix-#08)
190b  fe02      cp      #02
190d  2848      jr      z,#1957         ; (72)
190f  dd7ef9    ld      a,(ix-#07)
1912  ddb6f8    or      (ix-#08)
1915  dd77f9    ld      (ix-#07),a
1918  2e01      ld      l,#01
191a  cd6e22    call    #226e
191d  dd71f8    ld      (ix-#08),c
1920  dd7ef8    ld      a,(ix-#08)
1923  fe02      cp      #02
1925  2830      jr      z,#1957         ; (48)
1927  dd7ef9    ld      a,(ix-#07)
192a  ddb6f8    or      (ix-#08)
192d  dd77f9    ld      (ix-#07),a
1930  2e01      ld      l,#01
1932  cdda1f    call    #1fda
1935  dd71f8    ld      (ix-#08),c
1938  dd7ef8    ld      a,(ix-#08)
193b  fe02      cp      #02
193d  2818      jr      z,#1957         ; (24)
193f  dd7ef9    ld      a,(ix-#07)
1942  ddb6f8    or      (ix-#08)
1945  dd77f9    ld      (ix-#07),a
1948  2e01      ld      l,#01
194a  cd241f    call    #1f24
194d  dd71f8    ld      (ix-#08),c
1950  dd7ef8    ld      a,(ix-#08)
1953  fe02      cp      #02
1955  2005      jr      nz,#195c        ; (5)
1957  0e02      ld      c,#02
1959  c384be    jp      #be84
195c  dd7ef9    ld      a,(ix-#07)
195f  ddb6f8    or      (ix-#08)
1962  dd77f9    ld      (ix-#07),a
1965  dd4ef9    ld      c,(ix-#07)
1968  c384be    jp      #be84
196b  da1f6b    jp      c,#6b1f
196e  23        inc     hl
196f  6e        ld      l,(hl)
1970  22241f    ld      (#1f24),hl
1973  80        add     a,b
1974  20fa      jr      nz,#1970        ; (-6)
1976  23        inc     hl
1977  fd22c21f  ld      (#1fc2),iy
197b  02        ld      (bc),a
197c  1619      ld      d,#19
197e  5a        ld      e,d
197f  1a        ld      a,(de)
1980  3b        dec     sp
1981  1a        ld      a,(de)
1982  19        add     hl,de
1983  1a        ld      a,(de)
1984  02        ld      (bc),a
1985  00        nop     
1986  02        ld      (bc),a
1987  f7        rst     #30
1988  19        add     hl,de
1989  b6        or      (hl)
198a  19        add     hl,de
198b  b1        or      c
198c  19        add     hl,de
198d  f7        rst     #30
198e  21f5ff    ld      hl,#fff5
1991  39        add     hl,sp
1992  f9        ld      sp,hl
1993  2e58      ld      l,#58
1995  cf        rst     #8
1996  3a27f1    ld      a,(#f127)
1999  dd77f6    ld      (ix-#0a),a
199c  dd6ef6    ld      l,(ix-#0a)
199f  d7        rst     #10
19a0  2e00      ld      l,#00
19a2  cdcda3    call    #a3cd
19a5  dd71f7    ld      (ix-#09),c
19a8  dd4ef7    ld      c,(ix-#09)
19ab  218419    ld      hl,#1984
19ae  c3edb8    jp      #b8ed
19b1  0e02      ld      c,#02
19b3  c372be    jp      #be72
19b6  dd6ef6    ld      l,(ix-#0a)
19b9  7d        ld      a,l
19ba  87        add     a,a
19bb  6f        ld      l,a
19bc  4f        ld      c,a
19bd  87        add     a,a
19be  9f        sbc     a,a
19bf  47        ld      b,a
19c0  69        ld      l,c
19c1  60        ld      h,b
19c2  013f19    ld      bc,#193f
19c5  09        add     hl,bc
19c6  7e        ld      a,(hl)
19c7  dd77f8    ld      (ix-#08),a
19ca  23        inc     hl
19cb  7e        ld      a,(hl)
19cc  dd77f9    ld      (ix-#07),a
19cf  2e7f      ld      l,#7f
19d1  d7        rst     #10
19d2  210000    ld      hl,#0000
19d5  e5        push    hl
19d6  dd6ef8    ld      l,(ix-#08)
19d9  dd66f9    ld      h,(ix-#07)
19dc  e5        push    hl
19dd  3a40f1    ld      a,(#f140)
19e0  fe03      cp      #03
19e2  2004      jr      nz,#19e8        ; (4)
19e4  0e01      ld      c,#01
19e6  1802      jr      #19ea           ; (2)
19e8  0e00      ld      c,#00
19ea  69        ld      l,c
19eb  cd5188    call    #8851
19ee  dd71f5    ld      (ix-#0b),c
19f1  dd4ef5    ld      c,(ix-#0b)
19f4  c372be    jp      #be72
19f7  dd6ef6    ld      l,(ix-#0a)
19fa  7d        ld      a,l
19fb  87        add     a,a
19fc  6f        ld      l,a
19fd  4f        ld      c,a
19fe  87        add     a,a
19ff  9f        sbc     a,a
1a00  47        ld      b,a
1a01  69        ld      l,c
1a02  60        ld      h,b
1a03  014719    ld      bc,#1947
1a06  09        add     hl,bc
1a07  7e        ld      a,(hl)
1a08  dd77f8    ld      (ix-#08),a
1a0b  23        inc     hl
1a0c  7e        ld      a,(hl)
1a0d  dd77f9    ld      (ix-#07),a
1a10  dd4ef6    ld      c,(ix-#0a)
1a13  217b19    ld      hl,#197b
1a16  c3edb8    jp      #b8ed
1a19  2e54      ld      l,#54
1a1b  d7        rst     #10
1a1c  21f903    ld      hl,#03f9
1a1f  e5        push    hl
1a20  214104    ld      hl,#0441
1a23  e5        push    hl
1a24  2e00      ld      l,#00
1a26  e5        push    hl
1a27  2e10      ld      l,#10
1a29  e5        push    hl
1a2a  218cf1    ld      hl,#f18c
1a2d  cd4c78    call    #784c
1a30  79        ld      a,c
1a31  b7        or      a
1a32  c2cf19    jp      nz,#19cf
1a35  c3b119    jp      #19b1
1a38  c3cf19    jp      #19cf
1a3b  2e55      ld      l,#55
1a3d  d7        rst     #10
1a3e  21d4f0    ld      hl,#f0d4
1a41  e5        push    hl
1a42  21bd03    ld      hl,#03bd
1a45  e5        push    hl
1a46  2e00      ld      l,#00
1a48  e5        push    hl
1a49  2e10      ld      l,#10
1a4b  e5        push    hl
1a4c  2188f1    ld      hl,#f188
1a4f  cd4c78    call    #784c
1a52  79        ld      a,c
1a53  b7        or      a
1a54  c2cf19    jp      nz,#19cf
1a57  c3b119    jp      #19b1
1a5a  2e63      ld      l,#63
1a5c  d7        rst     #10
1a5d  c3cf19    jp      #19cf
1a60  f7        rst     #30
1a61  2e58      ld      l,#58
1a63  cf        rst     #8
1a64  2e15      ld      l,#15
1a66  d7        rst     #10
1a67  2e7f      ld      l,#7f
1a69  d7        rst     #10
1a6a  210000    ld      hl,#0000
1a6d  e5        push    hl
1a6e  21861a    ld      hl,#1a86
1a71  e5        push    hl
1a72  3a40f1    ld      a,(#f140)
1a75  fe03      cp      #03
1a77  2004      jr      nz,#1a7d        ; (4)
1a79  0e01      ld      c,#01
1a7b  1802      jr      #1a7f           ; (2)
1a7d  0e00      ld      c,#00
1a7f  69        ld      l,c
1a80  cd5188    call    #8851
1a83  c372be    jp      #be72
1a86  e7        rst     #20
1a87  21f7ff    ld      hl,#fff7
1a8a  39        add     hl,sp
1a8b  f9        ld      sp,hl
1a8c  3a14f1    ld      a,(#f114)
1a8f  dd77f7    ld      (ix-#09),a
1a92  3a14f1    ld      a,(#f114)
1a95  e6f8      and     #f8
1a97  3214f1    ld      (#f114),a
1a9a  2e00      ld      l,#00
1a9c  cd7f94    call    #947f
1a9f  dd71f9    ld      (ix-#07),c
1aa2  dd7ef9    ld      a,(ix-#07)
1aa5  fe02      cp      #02
1aa7  ca521b    jp      z,#1b52
1aaa  2e04      ld      l,#04
1aac  cd1d8b    call    #8b1d
1aaf  dd71f8    ld      (ix-#08),c
1ab2  dd7ef8    ld      a,(ix-#08)
1ab5  fe02      cp      #02
1ab7  ca521b    jp      z,#1b52
1aba  dd7ef9    ld      a,(ix-#07)
1abd  ddb6f8    or      (ix-#08)
1ac0  dd77f9    ld      (ix-#07),a
1ac3  2147f3    ld      hl,#f347
1ac6  7e        ld      a,(hl)
1ac7  23        inc     hl
1ac8  b6        or      (hl)
1ac9  23        inc     hl
1aca  b6        or      (hl)
1acb  23        inc     hl
1acc  b6        or      (hl)
1acd  2817      jr      z,#1ae6         ; (23)
1acf  21021e    ld      hl,#1e02
1ad2  e5        push    hl
1ad3  215e1e    ld      hl,#1e5e
1ad6  cd84b1    call    #b184
1ad9  dd71f8    ld      (ix-#08),c
1adc  dd7ef8    ld      a,(ix-#08)
1adf  fe02      cp      #02
1ae1  201e      jr      nz,#1b01        ; (30)
1ae3  c3521b    jp      #1b52
1ae6  3e6c      ld      a,#6c
1ae8  324df4    ld      (#f44d),a
1aeb  dd7ef9    ld      a,(ix-#07)
1aee  b7        or      a
1aef  201b      jr      nz,#1b0c        ; (27)
1af1  dd6ef7    ld      l,(ix-#09)
1af4  7d        ld      a,l
1af5  e604      and     #04
1af7  6f        ld      l,a
1af8  3a14f1    ld      a,(#f114)
1afb  b5        or      l
1afc  3214f1    ld      (#f114),a
1aff  180b      jr      #1b0c           ; (11)
1b01  dd7ef9    ld      a,(ix-#07)
1b04  ddb6f8    or      (ix-#08)
1b07  dd77f9    ld      (ix-#07),a
1b0a  18da      jr      #1ae6           ; (-38)
1b0c  cd721b    call    #1b72
1b0f  dd71f8    ld      (ix-#08),c
1b12  dd7ef8    ld      a,(ix-#08)
1b15  fe02      cp      #02
1b17  2839      jr      z,#1b52         ; (57)
1b19  dd7ef9    ld      a,(ix-#07)
1b1c  ddb6f8    or      (ix-#08)
1b1f  dd77f9    ld      (ix-#07),a
1b22  219cf1    ld      hl,#f19c
1b25  e5        push    hl
1b26  21c1f0    ld      hl,#f0c1
1b29  e5        push    hl
1b2a  df        rst     #18
1b2b  f1        pop     af
1b2c  3e6d      ld      a,#6d
1b2e  324df4    ld      (#f44d),a
1b31  dd7ef9    ld      a,(ix-#07)
1b34  b7        or      a
1b35  200e      jr      nz,#1b45        ; (14)
1b37  dd6ef7    ld      l,(ix-#09)
1b3a  7d        ld      a,l
1b3b  e602      and     #02
1b3d  6f        ld      l,a
1b3e  3a14f1    ld      a,(#f114)
1b41  b5        or      l
1b42  3214f1    ld      (#f114),a
1b45  cd721b    call    #1b72
1b48  dd71f8    ld      (ix-#08),c
1b4b  dd7ef8    ld      a,(ix-#08)
1b4e  fe02      cp      #02
1b50  200b      jr      nz,#1b5d        ; (11)
1b52  dd7ef7    ld      a,(ix-#09)
1b55  3214f1    ld      (#f114),a
1b58  0e02      ld      c,#02
1b5a  c384be    jp      #be84
1b5d  dd7ef9    ld      a,(ix-#07)
1b60  ddb6f8    or      (ix-#08)
1b63  dd77f9    ld      (ix-#07),a
1b66  dd7ef7    ld      a,(ix-#09)
1b69  3214f1    ld      (#f114),a
1b6c  dd4ef9    ld      c,(ix-#07)
1b6f  c384be    jp      #be84
1b72  f7        rst     #30
1b73  f5        push    af
1b74  f5        push    af
1b75  f5        push    af
1b76  f5        push    af
1b77  dd36f900  ld      (ix-#07),#00
1b7b  97        sub     a
1b7c  3248f4    ld      (#f448),a
1b7f  3249f4    ld      (#f449),a
1b82  324af4    ld      (#f44a),a
1b85  324bf4    ld      (#f44b),a
1b88  cdfa1b    call    #1bfa
1b8b  dd71f8    ld      (ix-#08),c
1b8e  dd7ef8    ld      a,(ix-#08)
1b91  fe02      cp      #02
1b93  2851      jr      z,#1be6         ; (81)
1b95  dd7ef9    ld      a,(ix-#07)
1b98  ddb6f8    or      (ix-#08)
1b9b  dd77f9    ld      (ix-#07),a
1b9e  2148f4    ld      hl,#f448
1ba1  e5        push    hl
1ba2  3a4df4    ld      a,(#f44d)
1ba5  fe6c      cp      #6c
1ba7  2009      jr      nz,#1bb2        ; (9)
1ba9  213d04    ld      hl,#043d
1bac  1135f9    ld      de,#f935
1baf  ff        rst     #38
1bb0  1807      jr      #1bb9           ; (7)
1bb2  21d4f0    ld      hl,#f0d4
1bb5  1135f9    ld      de,#f935
1bb8  ff        rst     #38
1bb9  2135f9    ld      hl,#f935
1bbc  e5        push    hl
1bbd  df        rst     #18
1bbe  f1        pop     af
1bbf  cdfa1b    call    #1bfa
1bc2  dd71f8    ld      (ix-#08),c
1bc5  dd7ef8    ld      a,(ix-#08)
1bc8  fe02      cp      #02
1bca  281a      jr      z,#1be6         ; (26)
1bcc  dd7ef9    ld      a,(ix-#07)
1bcf  ddb6f8    or      (ix-#08)
1bd2  dd77f9    ld      (ix-#07),a
1bd5  3a4df4    ld      a,(#f44d)
1bd8  6f        ld      l,a
1bd9  cdb026    call    #26b0
1bdc  dd71f8    ld      (ix-#08),c
1bdf  dd7ef8    ld      a,(ix-#08)
1be2  fe02      cp      #02
1be4  2005      jr      nz,#1beb        ; (5)
1be6  0e02      ld      c,#02
1be8  c372be    jp      #be72
1beb  dd7ef9    ld      a,(ix-#07)
1bee  ddb6f8    or      (ix-#08)
1bf1  dd77f9    ld      (ix-#07),a
1bf4  dd4ef9    ld      c,(ix-#07)
1bf7  c372be    jp      #be72
1bfa  f7        rst     #30
1bfb  21f6ff    ld      hl,#fff6
1bfe  39        add     hl,sp
1bff  f9        ld      sp,hl
1c00  dd36f700  ld      (ix-#09),#00
1c04  3a4df4    ld      a,(#f44d)
1c07  fe6c      cp      #6c
1c09  201c      jr      nz,#1c27        ; (28)
1c0b  219cf1    ld      hl,#f19c
1c0e  e5        push    hl
1c0f  2148f4    ld      hl,#f448
1c12  e5        push    hl
1c13  df        rst     #18
1c14  f1        pop     af
1c15  2e09      ld      l,#09
1c17  cd1d8b    call    #8b1d
1c1a  dd71f6    ld      (ix-#0a),c
1c1d  dd7ef6    ld      a,(ix-#0a)
1c20  fe02      cp      #02
1c22  201f      jr      nz,#1c43        ; (31)
1c24  c3ca1c    jp      #1cca
1c27  2198f1    ld      hl,#f198
1c2a  e5        push    hl
1c2b  2148f4    ld      hl,#f448
1c2e  e5        push    hl
1c2f  df        rst     #18
1c30  f1        pop     af
1c31  2e07      ld      l,#07
1c33  cd1d8b    call    #8b1d
1c36  dd71f6    ld      (ix-#0a),c
1c39  dd7ef6    ld      a,(ix-#0a)
1c3c  fe02      cp      #02
1c3e  2016      jr      nz,#1c56        ; (22)
1c40  c3ca1c    jp      #1cca
1c43  dd7ef7    ld      a,(ix-#09)
1c46  ddb6f6    or      (ix-#0a)
1c49  dd77f7    ld      (ix-#09),a
1c4c  dd36f820  ld      (ix-#08),#20
1c50  dd36f900  ld      (ix-#07),#00
1c54  1814      jr      #1c6a           ; (20)
1c56  dd7ef7    ld      a,(ix-#09)
1c59  ddb6f6    or      (ix-#0a)
1c5c  dd77f7    ld      (ix-#09),a
1c5f  3ad9f0    ld      a,(#f0d9)
1c62  dd77f8    ld      (ix-#08),a
1c65  87        add     a,a
1c66  9f        sbc     a,a
1c67  dd77f9    ld      (ix-#07),a
1c6a  2142f4    ld      hl,#f442
1c6d  e5        push    hl
1c6e  2147f3    ld      hl,#f347
1c71  e5        push    hl
1c72  df        rst     #18
1c73  e1        pop     hl
1c74  7e        ld      a,(hl)
1c75  23        inc     hl
1c76  b6        or      (hl)
1c77  23        inc     hl
1c78  b6        or      (hl)
1c79  23        inc     hl
1c7a  b6        or      (hl)
1c7b  cacf1c    jp      z,#1ccf
1c7e  97        sub     a
1c7f  3246f4    ld      (#f446),a
1c82  3247f4    ld      (#f447),a
1c85  3a46f4    ld      a,(#f446)
1c88  dd96f8    sub     (ix-#08)
1c8b  3a47f4    ld      a,(#f447)
1c8e  dd9ef9    sbc     a,(ix-#07)
1c91  f2cf1c    jp      p,#1ccf
1c94  2a46f4    ld      hl,(#f446)
1c97  29        add     hl,hl
1c98  29        add     hl,hl
1c99  013d03    ld      bc,#033d
1c9c  09        add     hl,bc
1c9d  1135f9    ld      de,#f935
1ca0  ff        rst     #38
1ca1  2135f9    ld      hl,#f935
1ca4  e5        push    hl
1ca5  2142f4    ld      hl,#f442
1ca8  e5        push    hl
1ca9  cd8dba    call    #ba8d
1cac  e1        pop     hl
1cad  7e        ld      a,(hl)
1cae  23        inc     hl
1caf  b6        or      (hl)
1cb0  23        inc     hl
1cb1  b6        or      (hl)
1cb2  23        inc     hl
1cb3  b6        or      (hl)
1cb4  281f      jr      z,#1cd5         ; (31)
1cb6  21ea1c    ld      hl,#1cea
1cb9  e5        push    hl
1cba  21581d    ld      hl,#1d58
1cbd  cd84b1    call    #b184
1cc0  dd71f6    ld      (ix-#0a),c
1cc3  dd7ef6    ld      a,(ix-#0a)
1cc6  fe02      cp      #02
1cc8  2015      jr      nz,#1cdf        ; (21)
1cca  0e02      ld      c,#02
1ccc  c372be    jp      #be72
1ccf  dd4ef7    ld      c,(ix-#09)
1cd2  c372be    jp      #be72
1cd5  2a46f4    ld      hl,(#f446)
1cd8  23        inc     hl
1cd9  2246f4    ld      (#f446),hl
1cdc  c3851c    jp      #1c85
1cdf  dd7ef7    ld      a,(ix-#09)
1ce2  ddb6f6    or      (ix-#0a)
1ce5  dd77f7    ld      (ix-#09),a
1ce8  18eb      jr      #1cd5           ; (-21)
1cea  e7        rst     #20
1ceb  dd7e04    ld      a,(ix+#04)
1cee  b7        or      a
1cef  ca391d    jp      z,#1d39
1cf2  2e71      ld      l,#71
1cf4  cf        rst     #8
1cf5  2e58      ld      l,#58
1cf7  cf        rst     #8
1cf8  3a4df4    ld      a,(#f44d)
1cfb  6f        ld      l,a
1cfc  d7        rst     #10
1cfd  2e6a      ld      l,#6a
1cff  d7        rst     #10
1d00  2e60      ld      l,#60
1d02  d7        rst     #10
1d03  3a46f4    ld      a,(#f446)
1d06  32c7f0    ld      (#f0c7),a
1d09  2e01      ld      l,#01
1d0b  e5        push    hl
1d0c  2e0a      ld      l,#0a
1d0e  e5        push    hl
1d0f  21c5f0    ld      hl,#f0c5
1d12  cdc57f    call    #7fc5
1d15  2e63      ld      l,#63
1d17  d7        rst     #10
1d18  2148f4    ld      hl,#f448
1d1b  7e        ld      a,(hl)
1d1c  23        inc     hl
1d1d  b6        or      (hl)
1d1e  23        inc     hl
1d1f  b6        or      (hl)
1d20  23        inc     hl
1d21  b6        or      (hl)
1d22  2804      jr      z,#1d28         ; (4)
1d24  0e6f      ld      c,#6f
1d26  1802      jr      #1d2a           ; (2)
1d28  0e6e      ld      c,#6e
1d2a  79        ld      a,c
1d2b  324cf4    ld      (#f44c),a
1d2e  6f        ld      l,a
1d2f  d7        rst     #10
1d30  2e7d      ld      l,#7d
1d32  d7        rst     #10
1d33  2e72      ld      l,#72
1d35  cf        rst     #8
1d36  cdd0b8    call    #b8d0
1d39  dd7e04    ld      a,(ix+#04)
1d3c  b7        or      a
1d3d  2804      jr      z,#1d43         ; (4)
1d3f  0e0a      ld      c,#0a
1d41  1802      jr      #1d45           ; (2)
1d43  0e10      ld      c,#10
1d45  69        ld      l,c
1d46  cd7c76    call    #767c
1d49  79        ld      a,c
1d4a  b7        or      a
1d4b  28ec      jr      z,#1d39         ; (-20)
1d4d  2e7f      ld      l,#7f
1d4f  e5        push    hl
1d50  2eff      ld      l,#ff
1d52  cd657f    call    #7f65
1d55  c384be    jp      #be84
1d58  f7        rst     #30
1d59  21f7ff    ld      hl,#fff7
1d5c  39        add     hl,sp
1d5d  f9        ld      sp,hl
1d5e  dd36f900  ld      (ix-#07),#00
1d62  3a4df4    ld      a,(#f44d)
1d65  fe6c      cp      #6c
1d67  2004      jr      nz,#1d6d        ; (4)
1d69  0e09      ld      c,#09
1d6b  1802      jr      #1d6f           ; (2)
1d6d  0e07      ld      c,#07
1d6f  69        ld      l,c
1d70  cd1d8b    call    #8b1d
1d73  dd71f8    ld      (ix-#08),c
1d76  dd7ef8    ld      a,(ix-#08)
1d79  fe02      cp      #02
1d7b  2005      jr      nz,#1d82        ; (5)
1d7d  0e02      ld      c,#02
1d7f  c372be    jp      #be72
1d82  dd7ef9    ld      a,(ix-#07)
1d85  ddb6f8    or      (ix-#08)
1d88  dd77f9    ld      (ix-#07),a
1d8b  2a46f4    ld      hl,(#f446)
1d8e  29        add     hl,hl
1d8f  29        add     hl,hl
1d90  013d03    ld      bc,#033d
1d93  09        add     hl,bc
1d94  1135f9    ld      de,#f935
1d97  ff        rst     #38
1d98  2135f9    ld      hl,#f935
1d9b  e5        push    hl
1d9c  2142f4    ld      hl,#f442
1d9f  e5        push    hl
1da0  2147f3    ld      hl,#f347
1da3  e5        push    hl
1da4  df        rst     #18
1da5  cd8dba    call    #ba8d
1da8  e1        pop     hl
1da9  7e        ld      a,(hl)
1daa  23        inc     hl
1dab  b6        or      (hl)
1dac  23        inc     hl
1dad  b6        or      (hl)
1dae  23        inc     hl
1daf  b6        or      (hl)
1db0  2834      jr      z,#1de6         ; (52)
1db2  dd36f901  ld      (ix-#07),#01
1db6  2148f4    ld      hl,#f448
1db9  7e        ld      a,(hl)
1dba  23        inc     hl
1dbb  b6        or      (hl)
1dbc  23        inc     hl
1dbd  b6        or      (hl)
1dbe  23        inc     hl
1dbf  b6        or      (hl)
1dc0  2804      jr      z,#1dc6         ; (4)
1dc2  0e6f      ld      c,#6f
1dc4  1802      jr      #1dc8           ; (2)
1dc6  0e6e      ld      c,#6e
1dc8  dd71f7    ld      (ix-#09),c
1dcb  214cf4    ld      hl,#f44c
1dce  dd7ef7    ld      a,(ix-#09)
1dd1  be        cp      (hl)
1dd2  2828      jr      z,#1dfc         ; (40)
1dd4  dd7ef7    ld      a,(ix-#09)
1dd7  324cf4    ld      (#f44c),a
1dda  6f        ld      l,a
1ddb  e5        push    hl
1ddc  2efe      ld      l,#fe
1dde  cd657f    call    #7f65
1de1  cdd0b8    call    #b8d0
1de4  1816      jr      #1dfc           ; (22)
1de6  3a4cf4    ld      a,(#f44c)
1de9  fe6b      cp      #6b
1deb  280f      jr      z,#1dfc         ; (15)
1ded  3e6b      ld      a,#6b
1def  324cf4    ld      (#f44c),a
1df2  6f        ld      l,a
1df3  e5        push    hl
1df4  2efe      ld      l,#fe
1df6  cd657f    call    #7f65
1df9  cdd0b8    call    #b8d0
1dfc  dd4ef9    ld      c,(ix-#07)
1dff  c372be    jp      #be72
1e02  e7        rst     #20
1e03  dd7e04    ld      a,(ix+#04)
1e06  b7        or      a
1e07  ca3f1e    jp      z,#1e3f
1e0a  2e71      ld      l,#71
1e0c  cf        rst     #8
1e0d  2e58      ld      l,#58
1e0f  cf        rst     #8
1e10  2e65      ld      l,#65
1e12  d7        rst     #10
1e13  3e67      ld      a,#67
1e15  324cf4    ld      (#f44c),a
1e18  6f        ld      l,a
1e19  d7        rst     #10
1e1a  2e63      ld      l,#63
1e1c  d7        rst     #10
1e1d  2e60      ld      l,#60
1e1f  d7        rst     #10
1e20  2142f4    ld      hl,#f442
1e23  e5        push    hl
1e24  2147f3    ld      hl,#f347
1e27  e5        push    hl
1e28  df        rst     #18
1e29  f1        pop     af
1e2a  2e22      ld      l,#22
1e2c  e5        push    hl
1e2d  2e02      ld      l,#02
1e2f  e5        push    hl
1e30  2142f4    ld      hl,#f442
1e33  cdc57f    call    #7fc5
1e36  2e7d      ld      l,#7d
1e38  d7        rst     #10
1e39  2e72      ld      l,#72
1e3b  cf        rst     #8
1e3c  cdd0b8    call    #b8d0
1e3f  dd7e04    ld      a,(ix+#04)
1e42  b7        or      a
1e43  2804      jr      z,#1e49         ; (4)
1e45  0e0a      ld      c,#0a
1e47  1802      jr      #1e4b           ; (2)
1e49  0e10      ld      c,#10
1e4b  69        ld      l,c
1e4c  cd7c76    call    #767c
1e4f  79        ld      a,c
1e50  b7        or      a
1e51  28ec      jr      z,#1e3f         ; (-20)
1e53  2e7f      ld      l,#7f
1e55  e5        push    hl
1e56  2eff      ld      l,#ff
1e58  cd657f    call    #7f65
1e5b  c384be    jp      #be84
1e5e  f7        rst     #30
1e5f  f5        push    af
1e60  f5        push    af
1e61  f5        push    af
1e62  f5        push    af
1e63  dd36f900  ld      (ix-#07),#00
1e67  2e04      ld      l,#04
1e69  cd1d8b    call    #8b1d
1e6c  dd71f8    ld      (ix-#08),c
1e6f  dd7ef8    ld      a,(ix-#08)
1e72  fe02      cp      #02
1e74  2005      jr      nz,#1e7b        ; (5)
1e76  0e02      ld      c,#02
1e78  c372be    jp      #be72
1e7b  dd7ef9    ld      a,(ix-#07)
1e7e  ddb6f8    or      (ix-#08)
1e81  dd77f9    ld      (ix-#07),a
1e84  2147f3    ld      hl,#f347
1e87  7e        ld      a,(hl)
1e88  23        inc     hl
1e89  b6        or      (hl)
1e8a  23        inc     hl
1e8b  b6        or      (hl)
1e8c  23        inc     hl
1e8d  b6        or      (hl)
1e8e  2821      jr      z,#1eb1         ; (33)
1e90  dd7ef9    ld      a,(ix-#07)
1e93  f601      or      #01
1e95  dd77f9    ld      (ix-#07),a
1e98  3a4cf4    ld      a,(#f44c)
1e9b  fe67      cp      #67
1e9d  caef1e    jp      z,#1eef
1ea0  3e67      ld      a,#67
1ea2  324cf4    ld      (#f44c),a
1ea5  6f        ld      l,a
1ea6  e5        push    hl
1ea7  2e01      ld      l,#01
1ea9  cd657f    call    #7f65
1eac  cdd0b8    call    #b8d0
1eaf  183e      jr      #1eef           ; (62)
1eb1  3a4cf4    ld      a,(#f44c)
1eb4  fe6b      cp      #6b
1eb6  ca1e1f    jp      z,#1f1e
1eb9  2e71      ld      l,#71
1ebb  cf        rst     #8
1ebc  3e6b      ld      a,#6b
1ebe  324cf4    ld      (#f44c),a
1ec1  6f        ld      l,a
1ec2  e5        push    hl
1ec3  2e01      ld      l,#01
1ec5  cd657f    call    #7f65
1ec8  2e59      ld      l,#59
1eca  cf        rst     #8
1ecb  97        sub     a
1ecc  3242f4    ld      (#f442),a
1ecf  3243f4    ld      (#f443),a
1ed2  3244f4    ld      (#f444),a
1ed5  3245f4    ld      (#f445),a
1ed8  2e22      ld      l,#22
1eda  e5        push    hl
1edb  2e02      ld      l,#02
1edd  e5        push    hl
1ede  2142f4    ld      hl,#f442
1ee1  cdc57f    call    #7fc5
1ee4  2e7f      ld      l,#7f
1ee6  d7        rst     #10
1ee7  2e72      ld      l,#72
1ee9  cf        rst     #8
1eea  cdd0b8    call    #b8d0
1eed  182f      jr      #1f1e           ; (47)
1eef  2142f4    ld      hl,#f442
1ef2  e5        push    hl
1ef3  2147f3    ld      hl,#f347
1ef6  e5        push    hl
1ef7  cdd9ba    call    #bad9
1efa  2822      jr      z,#1f1e         ; (34)
1efc  2e71      ld      l,#71
1efe  cf        rst     #8
1eff  2e59      ld      l,#59
1f01  cf        rst     #8
1f02  2142f4    ld      hl,#f442
1f05  e5        push    hl
1f06  2147f3    ld      hl,#f347
1f09  e5        push    hl
1f0a  df        rst     #18
1f0b  f1        pop     af
1f0c  2e22      ld      l,#22
1f0e  e5        push    hl
1f0f  2e02      ld      l,#02
1f11  e5        push    hl
1f12  2142f4    ld      hl,#f442
1f15  cdc57f    call    #7fc5
1f18  2e7f      ld      l,#7f
1f1a  d7        rst     #10
1f1b  2e72      ld      l,#72
1f1d  cf        rst     #8
1f1e  dd4ef9    ld      c,(ix-#07)
1f21  c372be    jp      #be72
1f24  e7        rst     #20
1f25  f5        push    af
1f26  f5        push    af
1f27  f5        push    af
1f28  f5        push    af
1f29  dd36f900  ld      (ix-#07),#00
1f2d  97        sub     a
1f2e  324ef4    ld      (#f44e),a
1f31  324ff4    ld      (#f44f),a
1f34  3a3ef1    ld      a,(#f13e)
1f37  5f        ld      e,a
1f38  87        add     a,a
1f39  9f        sbc     a,a
1f3a  57        ld      d,a
1f3b  3a4ef4    ld      a,(#f44e)
1f3e  93        sub     e
1f3f  3a4ff4    ld      a,(#f44f)
1f42  9a        sbc     a,d
1f43  f29a1f    jp      p,#1f9a
1f46  2a4ef4    ld      hl,(#f44e)
1f49  e5        push    hl
1f4a  211200    ld      hl,#0012
1f4d  e5        push    hl
1f4e  cd2dba    call    #ba2d
1f51  e1        pop     hl
1f52  01aee9    ld      bc,#e9ae
1f55  09        add     hl,bc
1f56  2250f4    ld      (#f450),hl
1f59  010800    ld      bc,#0008
1f5c  09        add     hl,bc
1f5d  7e        ld      a,(hl)
1f5e  fe01      cp      #01
1f60  c2a01f    jp      nz,#1fa0
1f63  2139f1    ld      hl,#f139
1f66  e5        push    hl
1f67  2a50f4    ld      hl,(#f450)
1f6a  e5        push    hl
1f6b  df        rst     #18
1f6c  f1        pop     af
1f6d  2121f1    ld      hl,#f121
1f70  e5        push    hl
1f71  2a50f4    ld      hl,(#f450)
1f74  23        inc     hl
1f75  23        inc     hl
1f76  23        inc     hl
1f77  23        inc     hl
1f78  e5        push    hl
1f79  df        rst     #18
1f7a  f1        pop     af
1f7b  2188f1    ld      hl,#f188
1f7e  e5        push    hl
1f7f  2a50f4    ld      hl,(#f450)
1f82  010e00    ld      bc,#000e
1f85  09        add     hl,bc
1f86  e5        push    hl
1f87  df        rst     #18
1f88  f1        pop     af
1f89  2e01      ld      l,#01
1f8b  cdc21f    call    #1fc2
1f8e  dd71f8    ld      (ix-#08),c
1f91  dd7ef8    ld      a,(ix-#08)
1f94  fe02      cp      #02
1f96  2012      jr      nz,#1faa        ; (18)
1f98  1823      jr      #1fbd           ; (35)
1f9a  dd4ef9    ld      c,(ix-#07)
1f9d  c384be    jp      #be84
1fa0  2a4ef4    ld      hl,(#f44e)
1fa3  23        inc     hl
1fa4  224ef4    ld      (#f44e),hl
1fa7  c3341f    jp      #1f34
1faa  dd7ef9    ld      a,(ix-#07)
1fad  ddb6f8    or      (ix-#08)
1fb0  dd77f9    ld      (ix-#07),a
1fb3  2e01      ld      l,#01
1fb5  cdceb2    call    #b2ce
1fb8  79        ld      a,c
1fb9  fe02      cp      #02
1fbb  20e3      jr      nz,#1fa0        ; (-29)
1fbd  0e02      ld      c,#02
1fbf  c384be    jp      #be84
1fc2  e7        rst     #20
1fc3  21f9ff    ld      hl,#fff9
1fc6  39        add     hl,sp
1fc7  f9        ld      sp,hl
1fc8  cd66a4    call    #a466
1fcb  2188f1    ld      hl,#f188
1fce  cda524    call    #24a5
1fd1  dd71f9    ld      (ix-#07),c
1fd4  dd4ef9    ld      c,(ix-#07)
1fd7  c384be    jp      #be84
1fda  e7        rst     #20
1fdb  f5        push    af
1fdc  f5        push    af
1fdd  f5        push    af
1fde  f5        push    af
1fdf  dd36f900  ld      (ix-#07),#00
1fe3  97        sub     a
1fe4  3253f4    ld      (#f453),a
1fe7  3254f4    ld      (#f454),a
1fea  3a3ef1    ld      a,(#f13e)
1fed  5f        ld      e,a
1fee  87        add     a,a
1fef  9f        sbc     a,a
1ff0  57        ld      d,a
1ff1  3a53f4    ld      a,(#f453)
1ff4  93        sub     e
1ff5  3a54f4    ld      a,(#f454)
1ff8  9a        sbc     a,d
1ff9  f25820    jp      p,#2058
1ffc  2a53f4    ld      hl,(#f453)
1fff  e5        push    hl
2000  211200    ld      hl,#0012
2003  e5        push    hl
2004  cd2dba    call    #ba2d
2007  e1        pop     hl
2008  01aee9    ld      bc,#e9ae
200b  09        add     hl,bc
200c  2255f4    ld      (#f455),hl
200f  010800    ld      bc,#0008
2012  09        add     hl,bc
2013  7e        ld      a,(hl)
2014  fe03      cp      #03
2016  2046      jr      nz,#205e        ; (70)
2018  2139f1    ld      hl,#f139
201b  e5        push    hl
201c  2a55f4    ld      hl,(#f455)
201f  e5        push    hl
2020  df        rst     #18
2021  f1        pop     af
2022  2121f1    ld      hl,#f121
2025  e5        push    hl
2026  2a55f4    ld      hl,(#f455)
2029  23        inc     hl
202a  23        inc     hl
202b  23        inc     hl
202c  23        inc     hl
202d  e5        push    hl
202e  df        rst     #18
202f  f1        pop     af
2030  2a55f4    ld      hl,(#f455)
2033  010e00    ld      bc,#000e
2036  09        add     hl,bc
2037  97        sub     a
2038  328cf1    ld      (#f18c),a
203b  328df1    ld      (#f18d),a
203e  7e        ld      a,(hl)
203f  328ef1    ld      (#f18e),a
2042  23        inc     hl
2043  7e        ld      a,(hl)
2044  328ff1    ld      (#f18f),a
2047  2e01      ld      l,#01
2049  cd8020    call    #2080
204c  dd71f8    ld      (ix-#08),c
204f  dd7ef8    ld      a,(ix-#08)
2052  fe02      cp      #02
2054  2012      jr      nz,#2068        ; (18)
2056  1823      jr      #207b           ; (35)
2058  dd4ef9    ld      c,(ix-#07)
205b  c384be    jp      #be84
205e  2a53f4    ld      hl,(#f453)
2061  23        inc     hl
2062  2253f4    ld      (#f453),hl
2065  c3ea1f    jp      #1fea
2068  dd7ef9    ld      a,(ix-#07)
206b  ddb6f8    or      (ix-#08)
206e  dd77f9    ld      (ix-#07),a
2071  2e01      ld      l,#01
2073  cdceb2    call    #b2ce
2076  79        ld      a,c
2077  fe02      cp      #02
2079  20e3      jr      nz,#205e        ; (-29)
207b  0e02      ld      c,#02
207d  c384be    jp      #be84
2080  e7        rst     #20
2081  f5        push    af
2082  f5        push    af
2083  f5        push    af
2084  f5        push    af
2085  cd66a4    call    #a466
2088  2e01      ld      l,#01
208a  e5        push    hl
208b  2121f1    ld      hl,#f121
208e  e5        push    hl
208f  2139f1    ld      hl,#f139
2092  cdfaac    call    #acfa
2095  dd71f9    ld      (ix-#07),c
2098  dd7ef9    ld      a,(ix-#07)
209b  fe02      cp      #02
209d  2824      jr      z,#20c3         ; (36)
209f  2145f3    ld      hl,#f345
20a2  3a8ef1    ld      a,(#f18e)
20a5  be        cp      (hl)
20a6  2005      jr      nz,#20ad        ; (5)
20a8  3a8ff1    ld      a,(#f18f)
20ab  23        inc     hl
20ac  be        cp      (hl)
20ad  2819      jr      z,#20c8         ; (25)
20af  215c21    ld      hl,#215c
20b2  e5        push    hl
20b3  21d920    ld      hl,#20d9
20b6  cd84b1    call    #b184
20b9  dd71f8    ld      (ix-#08),c
20bc  dd7ef8    ld      a,(ix-#08)
20bf  fe02      cp      #02
20c1  200b      jr      nz,#20ce        ; (11)
20c3  0e02      ld      c,#02
20c5  c384be    jp      #be84
20c8  dd4ef9    ld      c,(ix-#07)
20cb  c384be    jp      #be84
20ce  dd7ef9    ld      a,(ix-#07)
20d1  ddb6f8    or      (ix-#08)
20d4  dd77f9    ld      (ix-#07),a
20d7  18ef      jr      #20c8           ; (-17)
20d9  f7        rst     #30
20da  21f9ff    ld      hl,#fff9
20dd  39        add     hl,sp
20de  f9        ld      sp,hl
20df  2e01      ld      l,#01
20e1  e5        push    hl
20e2  2121f1    ld      hl,#f121
20e5  e5        push    hl
20e6  2139f1    ld      hl,#f139
20e9  cdfaac    call    #acfa
20ec  dd71f9    ld      (ix-#07),c
20ef  dd7ef9    ld      a,(ix-#07)
20f2  fe02      cp      #02
20f4  282b      jr      z,#2121         ; (43)
20f6  218cf1    ld      hl,#f18c
20f9  e5        push    hl
20fa  2143f3    ld      hl,#f343
20fd  e5        push    hl
20fe  cdd9ba    call    #bad9
2101  2824      jr      z,#2127         ; (36)
2103  dd7ef9    ld      a,(ix-#07)
2106  f601      or      #01
2108  dd77f9    ld      (ix-#07),a
210b  3a52f4    ld      a,(#f452)
210e  fe67      cp      #67
2110  280f      jr      z,#2121         ; (15)
2112  cdd0b8    call    #b8d0
2115  3e67      ld      a,#67
2117  3252f4    ld      (#f452),a
211a  6f        ld      l,a
211b  e5        push    hl
211c  2e06      ld      l,#06
211e  cd657f    call    #7f65
2121  dd4ef9    ld      c,(ix-#07)
2124  c372be    jp      #be72
2127  3a52f4    ld      a,(#f452)
212a  fe6b      cp      #6b
212c  28f3      jr      z,#2121         ; (-13)
212e  cdd0b8    call    #b8d0
2131  3e6b      ld      a,#6b
2133  3252f4    ld      (#f452),a
2136  6f        ld      l,a
2137  e5        push    hl
2138  2e06      ld      l,#06
213a  cd657f    call    #7f65
213d  18e2      jr      #2121           ; (-30)
213f  02        ld      (bc),a
2140  00        nop     
2141  010b22    ld      bc,#220b
2144  0e22      ld      c,#22
2146  7e        ld      a,(hl)
2147  21204e    ld      hl,#4e20
214a  4f        ld      c,a
214b  54        ld      d,h
214c  2000      jr      nz,#214e        ; (0)
214e  53        ld      d,e
214f  49        ld      c,c
2150  47        ld      b,a
2151  2057      jr      nz,#21aa        ; (87)
2153  41        ld      b,c
2154  53        ld      d,e
2155  2000      jr      nz,#2157        ; (0)
2157  52        ld      d,d
2158  4f        ld      c,a
2159  4d        ld      c,l
215a  2000      jr      nz,#215c        ; (0)
215c  e7        rst     #20
215d  21f9ff    ld      hl,#fff9
2160  39        add     hl,sp
2161  f9        ld      sp,hl
2162  dd36f900  ld      (ix-#07),#00
2166  dd7e04    ld      a,(ix+#04)
2169  b7        or      a
216a  2803      jr      z,#216f         ; (3)
216c  cdd0b8    call    #b8d0
216f  2e71      ld      l,#71
2171  cf        rst     #8
2172  2e58      ld      l,#58
2174  cf        rst     #8
2175  dd4ef9    ld      c,(ix-#07)
2178  213f21    ld      hl,#213f
217b  c3edb8    jp      #b8ed
217e  215721    ld      hl,#2157
2181  ef        rst     #28
2182  218cf1    ld      hl,#f18c
2185  e5        push    hl
2186  2143f3    ld      hl,#f343
2189  e5        push    hl
218a  cdd9ba    call    #bad9
218d  2804      jr      z,#2193         ; (4)
218f  0e67      ld      c,#67
2191  1802      jr      #2195           ; (2)
2193  0e6b      ld      c,#6b
2195  79        ld      a,c
2196  3252f4    ld      (#f452),a
2199  6f        ld      l,a
219a  d7        rst     #10
219b  2e63      ld      l,#63
219d  d7        rst     #10
219e  2e76      ld      l,#76
21a0  d7        rst     #10
21a1  2e60      ld      l,#60
21a3  d7        rst     #10
21a4  2e04      ld      l,#04
21a6  e5        push    hl
21a7  2e10      ld      l,#10
21a9  e5        push    hl
21aa  2139f1    ld      hl,#f139
21ad  cdc57f    call    #7fc5
21b0  2e77      ld      l,#77
21b2  d7        rst     #10
21b3  2e60      ld      l,#60
21b5  d7        rst     #10
21b6  2e04      ld      l,#04
21b8  e5        push    hl
21b9  2e10      ld      l,#10
21bb  e5        push    hl
21bc  2121f1    ld      hl,#f121
21bf  cdc57f    call    #7fc5
21c2  dd7e04    ld      a,(ix+#04)
21c5  b7        or      a
21c6  2804      jr      z,#21cc         ; (4)
21c8  0e7d      ld      c,#7d
21ca  1802      jr      #21ce           ; (2)
21cc  0e7f      ld      c,#7f
21ce  69        ld      l,c
21cf  d7        rst     #10
21d0  2e72      ld      l,#72
21d2  cf        rst     #8
21d3  2e10      ld      l,#10
21d5  cd1fb1    call    #b11f
21d8  dd7e04    ld      a,(ix+#04)
21db  b7        or      a
21dc  2804      jr      z,#21e2         ; (4)
21de  0e12      ld      c,#12
21e0  1802      jr      #21e4           ; (2)
21e2  0e13      ld      c,#13
21e4  69        ld      l,c
21e5  cd9573    call    #7395
21e8  2e10      ld      l,#10
21ea  cd36b1    call    #b136
21ed  3a27f1    ld      a,(#f127)
21f0  fe1b      cp      #1b
21f2  2810      jr      z,#2204         ; (16)
21f4  2e7f      ld      l,#7f
21f6  e5        push    hl
21f7  2eff      ld      l,#ff
21f9  cd657f    call    #7f65
21fc  cde6b8    call    #b8e6
21ff  0e02      ld      c,#02
2201  c384be    jp      #be84
2204  dd36f901  ld      (ix-#07),#01
2208  c36f21    jp      #216f
220b  c36f21    jp      #216f
220e  214e21    ld      hl,#214e
2211  ef        rst     #28
2212  2e60      ld      l,#60
2214  d7        rst     #10
2215  2e04      ld      l,#04
2217  e5        push    hl
2218  2e10      ld      l,#10
221a  e5        push    hl
221b  2143f3    ld      hl,#f343
221e  cdc57f    call    #7fc5
2221  218cf1    ld      hl,#f18c
2224  e5        push    hl
2225  2143f3    ld      hl,#f343
2228  e5        push    hl
2229  cdd9ba    call    #bad9
222c  2813      jr      z,#2241         ; (19)
222e  214821    ld      hl,#2148
2231  ef        rst     #28
2232  2e60      ld      l,#60
2234  d7        rst     #10
2235  2e04      ld      l,#04
2237  e5        push    hl
2238  2e10      ld      l,#10
223a  e5        push    hl
223b  218cf1    ld      hl,#f18c
223e  cdc57f    call    #7fc5
2241  dd7e04    ld      a,(ix+#04)
2244  b7        or      a
2245  2803      jr      z,#224a         ; (3)
2247  2e7d      ld      l,#7d
2249  d7        rst     #10
224a  2e72      ld      l,#72
224c  cf        rst     #8
224d  dd7e04    ld      a,(ix+#04)
2250  b7        or      a
2251  2804      jr      z,#2257         ; (4)
2253  0e14      ld      c,#14
2255  1802      jr      #2259           ; (2)
2257  0e15      ld      c,#15
2259  69        ld      l,c
225a  cd9573    call    #7395
225d  3a27f1    ld      a,(#f127)
2260  fe1a      cp      #1a
2262  2803      jr      z,#2267         ; (3)
2264  cde6b8    call    #b8e6
2267  dd36f900  ld      (ix-#07),#00
226b  c36f21    jp      #216f
226e  e7        rst     #20
226f  f5        push    af
2270  f5        push    af
2271  f5        push    af
2272  f5        push    af
2273  dd36f900  ld      (ix-#07),#00
2277  97        sub     a
2278  3257f4    ld      (#f457),a
227b  3258f4    ld      (#f458),a
227e  3a3ef1    ld      a,(#f13e)
2281  5f        ld      e,a
2282  87        add     a,a
2283  9f        sbc     a,a
2284  57        ld      d,a
2285  3a57f4    ld      a,(#f457)
2288  93        sub     e
2289  3a58f4    ld      a,(#f458)
228c  9a        sbc     a,d
228d  f2d522    jp      p,#22d5
2290  2a57f4    ld      hl,(#f457)
2293  e5        push    hl
2294  211200    ld      hl,#0012
2297  e5        push    hl
2298  cd2dba    call    #ba2d
229b  e1        pop     hl
229c  01aee9    ld      bc,#e9ae
229f  09        add     hl,bc
22a0  2259f4    ld      (#f459),hl
22a3  010800    ld      bc,#0008
22a6  09        add     hl,bc
22a7  7e        ld      a,(hl)
22a8  fe02      cp      #02
22aa  202f      jr      nz,#22db        ; (47)
22ac  2139f1    ld      hl,#f139
22af  e5        push    hl
22b0  2a59f4    ld      hl,(#f459)
22b3  e5        push    hl
22b4  df        rst     #18
22b5  f1        pop     af
22b6  2121f1    ld      hl,#f121
22b9  e5        push    hl
22ba  2a59f4    ld      hl,(#f459)
22bd  23        inc     hl
22be  23        inc     hl
22bf  23        inc     hl
22c0  23        inc     hl
22c1  e5        push    hl
22c2  df        rst     #18
22c3  f1        pop     af
22c4  2e01      ld      l,#01
22c6  cdfd22    call    #22fd
22c9  dd71f8    ld      (ix-#08),c
22cc  dd7ef8    ld      a,(ix-#08)
22cf  fe02      cp      #02
22d1  2012      jr      nz,#22e5        ; (18)
22d3  1823      jr      #22f8           ; (35)
22d5  dd4ef9    ld      c,(ix-#07)
22d8  c384be    jp      #be84
22db  2a57f4    ld      hl,(#f457)
22de  23        inc     hl
22df  2257f4    ld      (#f457),hl
22e2  c37e22    jp      #227e
22e5  dd7ef9    ld      a,(ix-#07)
22e8  ddb6f8    or      (ix-#08)
22eb  dd77f9    ld      (ix-#07),a
22ee  2e01      ld      l,#01
22f0  cdceb2    call    #b2ce
22f3  79        ld      a,c
22f4  fe02      cp      #02
22f6  20e3      jr      nz,#22db        ; (-29)
22f8  0e02      ld      c,#02
22fa  c384be    jp      #be84
22fd  e7        rst     #20
22fe  f5        push    af
22ff  f5        push    af
2300  f5        push    af
2301  f5        push    af
2302  cd66a4    call    #a466
2305  dd36f900  ld      (ix-#07),#00
2309  21d4f0    ld      hl,#f0d4
230c  cda524    call    #24a5
230f  dd71f8    ld      (ix-#08),c
2312  dd7ef8    ld      a,(ix-#08)
2315  fe02      cp      #02
2317  2842      jr      z,#235b         ; (66)
2319  dd7ef9    ld      a,(ix-#07)
231c  ddb6f8    or      (ix-#08)
231f  dd77f9    ld      (ix-#07),a
2322  dd7ef9    ld      a,(ix-#07)
2325  b7        or      a
2326  2011      jr      nz,#2339        ; (17)
2328  2e7e      ld      l,#7e
232a  cdb026    call    #26b0
232d  dd71f8    ld      (ix-#08),c
2330  dd7ef8    ld      a,(ix-#08)
2333  fe02      cp      #02
2335  2008      jr      nz,#233f        ; (8)
2337  1822      jr      #235b           ; (34)
2339  dd4ef9    ld      c,(ix-#07)
233c  c384be    jp      #be84
233f  dd7ef9    ld      a,(ix-#07)
2342  ddb6f8    or      (ix-#08)
2345  dd77f9    ld      (ix-#07),a
2348  dd7ef9    ld      a,(ix-#07)
234b  b7        or      a
234c  20eb      jr      nz,#2339        ; (-21)
234e  cd882a    call    #2a88
2351  dd71f8    ld      (ix-#08),c
2354  dd7ef8    ld      a,(ix-#08)
2357  fe02      cp      #02
2359  2005      jr      nz,#2360        ; (5)
235b  0e02      ld      c,#02
235d  c384be    jp      #be84
2360  dd7ef9    ld      a,(ix-#07)
2363  ddb6f8    or      (ix-#08)
2366  dd77f9    ld      (ix-#07),a
2369  18ce      jr      #2339           ; (-50)
236b  e7        rst     #20
236c  f5        push    af
236d  f5        push    af
236e  f5        push    af
236f  f5        push    af
2370  dd36f900  ld      (ix-#07),#00
2374  97        sub     a
2375  325bf4    ld      (#f45b),a
2378  325cf4    ld      (#f45c),a
237b  3a3ef1    ld      a,(#f13e)
237e  5f        ld      e,a
237f  87        add     a,a
2380  9f        sbc     a,a
2381  57        ld      d,a
2382  3a5bf4    ld      a,(#f45b)
2385  93        sub     e
2386  3a5cf4    ld      a,(#f45c)
2389  9a        sbc     a,d
238a  f2d223    jp      p,#23d2
238d  2a5bf4    ld      hl,(#f45b)
2390  e5        push    hl
2391  211200    ld      hl,#0012
2394  e5        push    hl
2395  cd2dba    call    #ba2d
2398  e1        pop     hl
2399  01aee9    ld      bc,#e9ae
239c  09        add     hl,bc
239d  225df4    ld      (#f45d),hl
23a0  010800    ld      bc,#0008
23a3  09        add     hl,bc
23a4  7e        ld      a,(hl)
23a5  fe02      cp      #02
23a7  202f      jr      nz,#23d8        ; (47)
23a9  2139f1    ld      hl,#f139
23ac  e5        push    hl
23ad  2a5df4    ld      hl,(#f45d)
23b0  e5        push    hl
23b1  df        rst     #18
23b2  f1        pop     af
23b3  2121f1    ld      hl,#f121
23b6  e5        push    hl
23b7  2a5df4    ld      hl,(#f45d)
23ba  23        inc     hl
23bb  23        inc     hl
23bc  23        inc     hl
23bd  23        inc     hl
23be  e5        push    hl
23bf  df        rst     #18
23c0  f1        pop     af
23c1  2e01      ld      l,#01
23c3  cdfa23    call    #23fa
23c6  dd71f8    ld      (ix-#08),c
23c9  dd7ef8    ld      a,(ix-#08)
23cc  fe02      cp      #02
23ce  2012      jr      nz,#23e2        ; (18)
23d0  1823      jr      #23f5           ; (35)
23d2  dd4ef9    ld      c,(ix-#07)
23d5  c384be    jp      #be84
23d8  2a5bf4    ld      hl,(#f45b)
23db  23        inc     hl
23dc  225bf4    ld      (#f45b),hl
23df  c37b23    jp      #237b
23e2  dd7ef9    ld      a,(ix-#07)
23e5  ddb6f8    or      (ix-#08)
23e8  dd77f9    ld      (ix-#07),a
23eb  2e01      ld      l,#01
23ed  cdceb2    call    #b2ce
23f0  79        ld      a,c
23f1  fe02      cp      #02
23f3  20e3      jr      nz,#23d8        ; (-29)
23f5  0e02      ld      c,#02
23f7  c384be    jp      #be84
23fa  e7        rst     #20
23fb  f5        push    af
23fc  f5        push    af
23fd  f5        push    af
23fe  f5        push    af
23ff  cd66a4    call    #a466
2402  dd36f900  ld      (ix-#07),#00
2406  21d4f0    ld      hl,#f0d4
2409  cda524    call    #24a5
240c  dd71f8    ld      (ix-#08),c
240f  dd7ef8    ld      a,(ix-#08)
2412  fe02      cp      #02
2414  ca9424    jp      z,#2494
2417  dd7ef9    ld      a,(ix-#07)
241a  ddb6f8    or      (ix-#08)
241d  dd77f9    ld      (ix-#07),a
2420  2e01      ld      l,#01
2422  cdceb2    call    #b2ce
2425  79        ld      a,c
2426  fe02      cp      #02
2428  ca9424    jp      z,#2494
242b  dd7ef9    ld      a,(ix-#07)
242e  b7        or      a
242f  2011      jr      nz,#2442        ; (17)
2431  2e7e      ld      l,#7e
2433  cdb026    call    #26b0
2436  dd71f8    ld      (ix-#08),c
2439  dd7ef8    ld      a,(ix-#08)
243c  fe02      cp      #02
243e  2008      jr      nz,#2448        ; (8)
2440  1852      jr      #2494           ; (82)
2442  dd4ef9    ld      c,(ix-#07)
2445  c384be    jp      #be84
2448  dd7ef9    ld      a,(ix-#07)
244b  ddb6f8    or      (ix-#08)
244e  dd77f9    ld      (ix-#07),a
2451  2e01      ld      l,#01
2453  cdceb2    call    #b2ce
2456  79        ld      a,c
2457  fe02      cp      #02
2459  2839      jr      z,#2494         ; (57)
245b  dd7ef9    ld      a,(ix-#07)
245e  b7        or      a
245f  20e1      jr      nz,#2442        ; (-31)
2461  cd4f2f    call    #2f4f
2464  dd71f8    ld      (ix-#08),c
2467  dd7ef8    ld      a,(ix-#08)
246a  fe02      cp      #02
246c  2826      jr      z,#2494         ; (38)
246e  dd7ef9    ld      a,(ix-#07)
2471  ddb6f8    or      (ix-#08)
2474  dd77f9    ld      (ix-#07),a
2477  2e01      ld      l,#01
2479  cdceb2    call    #b2ce
247c  79        ld      a,c
247d  fe02      cp      #02
247f  2813      jr      z,#2494         ; (19)
2481  dd7ef9    ld      a,(ix-#07)
2484  b7        or      a
2485  20bb      jr      nz,#2442        ; (-69)
2487  cd5f32    call    #325f
248a  dd71f8    ld      (ix-#08),c
248d  dd7ef8    ld      a,(ix-#08)
2490  fe02      cp      #02
2492  2005      jr      nz,#2499        ; (5)
2494  0e02      ld      c,#02
2496  c384be    jp      #be84
2499  dd7ef9    ld      a,(ix-#07)
249c  ddb6f8    or      (ix-#08)
249f  dd77f9    ld      (ix-#07),a
24a2  c34224    jp      #2442
24a5  e7        rst     #20
24a6  f5        push    af
24a7  f5        push    af
24a8  f5        push    af
24a9  f5        push    af
24aa  dd36f900  ld      (ix-#07),#00
24ae  2169f4    ld      hl,#f469
24b1  e5        push    hl
24b2  dd6e04    ld      l,(ix+#04)
24b5  dd6605    ld      h,(ix+#05)
24b8  e5        push    hl
24b9  df        rst     #18
24ba  f1        pop     af
24bb  2163f4    ld      hl,#f463
24be  e5        push    hl
24bf  2139f1    ld      hl,#f139
24c2  e5        push    hl
24c3  df        rst     #18
24c4  f1        pop     af
24c5  219cf1    ld      hl,#f19c
24c8  e5        push    hl
24c9  2163f4    ld      hl,#f463
24cc  e5        push    hl
24cd  df        rst     #18
24ce  f1        pop     af
24cf  2e0d      ld      l,#0d
24d1  cd1d8b    call    #8b1d
24d4  dd71f8    ld      (ix-#08),c
24d7  dd7ef8    ld      a,(ix-#08)
24da  fe02      cp      #02
24dc  ca4125    jp      z,#2541
24df  dd7ef9    ld      a,(ix-#07)
24e2  ddb6f8    or      (ix-#08)
24e5  dd77f9    ld      (ix-#07),a
24e8  2147f3    ld      hl,#f347
24eb  e5        push    hl
24ec  2169f4    ld      hl,#f469
24ef  e5        push    hl
24f0  cd8dba    call    #ba8d
24f3  e1        pop     hl
24f4  7e        ld      a,(hl)
24f5  23        inc     hl
24f6  b6        or      (hl)
24f7  23        inc     hl
24f8  b6        or      (hl)
24f9  23        inc     hl
24fa  b6        or      (hl)
24fb  2816      jr      z,#2513         ; (22)
24fd  217125    ld      hl,#2571
2500  e5        push    hl
2501  21e925    ld      hl,#25e9
2504  cd84b1    call    #b184
2507  dd71f8    ld      (ix-#08),c
250a  dd7ef8    ld      a,(ix-#08)
250d  fe02      cp      #02
250f  2015      jr      nz,#2526        ; (21)
2511  182e      jr      #2541           ; (46)
2513  2163f4    ld      hl,#f463
2516  e5        push    hl
2517  2121f1    ld      hl,#f121
251a  e5        push    hl
251b  cdd9ba    call    #bad9
251e  2011      jr      nz,#2531        ; (17)
2520  dd4ef9    ld      c,(ix-#07)
2523  c384be    jp      #be84
2526  dd7ef9    ld      a,(ix-#07)
2529  ddb6f8    or      (ix-#08)
252c  dd77f9    ld      (ix-#07),a
252f  18e2      jr      #2513           ; (-30)
2531  3a9ef1    ld      a,(#f19e)
2534  b7        or      a
2535  200f      jr      nz,#2546        ; (15)
2537  2e01      ld      l,#01
2539  cdceb2    call    #b2ce
253c  79        ld      a,c
253d  fe02      cp      #02
253f  2005      jr      nz,#2546        ; (5)
2541  0e02      ld      c,#02
2543  c384be    jp      #be84
2546  2163f4    ld      hl,#f463
2549  e5        push    hl
254a  3ab6f0    ld      a,(#f0b6)
254d  3237f9    ld      (#f937),a
2550  87        add     a,a
2551  9f        sbc     a,a
2552  3238f9    ld      (#f938),a
2555  3236f9    ld      (#f936),a
2558  3235f9    ld      (#f935),a
255b  2135f9    ld      hl,#f935
255e  e5        push    hl
255f  cd62ba    call    #ba62
2562  f1        pop     af
2563  c3c524    jp      #24c5
2566  2042      jr      nz,#25aa        ; (66)
2568  54        ld      d,h
2569  53        ld      d,e
256a  2000      jr      nz,#256c        ; (0)
256c  52        ld      d,d
256d  2f        cpl     
256e  57        ld      d,a
256f  2000      jr      nz,#2571        ; (0)
2571  e7        rst     #20
2572  dd7e04    ld      a,(ix+#04)
2575  b7        or      a
2576  caca25    jp      z,#25ca
2579  2e71      ld      l,#71
257b  cf        rst     #8
257c  2e58      ld      l,#58
257e  cf        rst     #8
257f  216c25    ld      hl,#256c
2582  ef        rst     #28
2583  3e67      ld      a,#67
2585  3267f4    ld      (#f467),a
2588  6f        ld      l,a
2589  d7        rst     #10
258a  2e63      ld      l,#63
258c  d7        rst     #10
258d  2e76      ld      l,#76
258f  d7        rst     #10
2590  2e04      ld      l,#04
2592  e5        push    hl
2593  2e10      ld      l,#10
2595  e5        push    hl
2596  2163f4    ld      hl,#f463
2599  cdc57f    call    #7fc5
259c  216625    ld      hl,#2566
259f  ef        rst     #28
25a0  2e60      ld      l,#60
25a2  d7        rst     #10
25a3  215ff4    ld      hl,#f45f
25a6  e5        push    hl
25a7  2147f3    ld      hl,#f347
25aa  e5        push    hl
25ab  df        rst     #18
25ac  f1        pop     af
25ad  3ad8f0    ld      a,(#f0d8)
25b0  87        add     a,a
25b1  6f        ld      l,a
25b2  7d        ld      a,l
25b3  3268f4    ld      (#f468),a
25b6  6f        ld      l,a
25b7  e5        push    hl
25b8  2e10      ld      l,#10
25ba  e5        push    hl
25bb  215ff4    ld      hl,#f45f
25be  cdc57f    call    #7fc5
25c1  2e7d      ld      l,#7d
25c3  d7        rst     #10
25c4  2e72      ld      l,#72
25c6  cf        rst     #8
25c7  cdd0b8    call    #b8d0
25ca  dd7e04    ld      a,(ix+#04)
25cd  b7        or      a
25ce  2804      jr      z,#25d4         ; (4)
25d0  0e0a      ld      c,#0a
25d2  1802      jr      #25d6           ; (2)
25d4  0e10      ld      c,#10
25d6  69        ld      l,c
25d7  cd7c76    call    #767c
25da  79        ld      a,c
25db  b7        or      a
25dc  28ec      jr      z,#25ca         ; (-20)
25de  2e7f      ld      l,#7f
25e0  e5        push    hl
25e1  2eff      ld      l,#ff
25e3  cd657f    call    #7f65
25e6  c384be    jp      #be84
25e9  f7        rst     #30
25ea  21f9ff    ld      hl,#fff9
25ed  39        add     hl,sp
25ee  f9        ld      sp,hl
25ef  2e0d      ld      l,#0d
25f1  cd1d8b    call    #8b1d
25f4  dd71f9    ld      (ix-#07),c
25f7  dd7ef9    ld      a,(ix-#07)
25fa  fe02      cp      #02
25fc  2836      jr      z,#2634         ; (54)
25fe  2147f3    ld      hl,#f347
2601  e5        push    hl
2602  2169f4    ld      hl,#f469
2605  e5        push    hl
2606  cd8dba    call    #ba8d
2609  e1        pop     hl
260a  7e        ld      a,(hl)
260b  23        inc     hl
260c  b6        or      (hl)
260d  23        inc     hl
260e  b6        or      (hl)
260f  23        inc     hl
2610  b6        or      (hl)
2611  2827      jr      z,#263a         ; (39)
2613  dd7ef9    ld      a,(ix-#07)
2616  f601      or      #01
2618  dd77f9    ld      (ix-#07),a
261b  3a67f4    ld      a,(#f467)
261e  fe67      cp      #67
2620  ca7e26    jp      z,#267e
2623  cdd0b8    call    #b8d0
2626  3e67      ld      a,#67
2628  3267f4    ld      (#f467),a
262b  6f        ld      l,a
262c  e5        push    hl
262d  2e06      ld      l,#06
262f  cd657f    call    #7f65
2632  184a      jr      #267e           ; (74)
2634  dd4ef9    ld      c,(ix-#07)
2637  c372be    jp      #be72
263a  dd7ef9    ld      a,(ix-#07)
263d  f600      or      #00
263f  dd77f9    ld      (ix-#07),a
2642  3a67f4    ld      a,(#f467)
2645  fe6b      cp      #6b
2647  28eb      jr      z,#2634         ; (-21)
2649  cdd0b8    call    #b8d0
264c  2e71      ld      l,#71
264e  cf        rst     #8
264f  3e6b      ld      a,#6b
2651  3267f4    ld      (#f467),a
2654  6f        ld      l,a
2655  e5        push    hl
2656  2e06      ld      l,#06
2658  cd657f    call    #7f65
265b  97        sub     a
265c  325ff4    ld      (#f45f),a
265f  3260f4    ld      (#f460),a
2662  3261f4    ld      (#f461),a
2665  3262f4    ld      (#f462),a
2668  2e59      ld      l,#59
266a  cf        rst     #8
266b  3a68f4    ld      a,(#f468)
266e  6f        ld      l,a
266f  e5        push    hl
2670  2e10      ld      l,#10
2672  e5        push    hl
2673  215ff4    ld      hl,#f45f
2676  cdc57f    call    #7fc5
2679  2e72      ld      l,#72
267b  cf        rst     #8
267c  18b6      jr      #2634           ; (-74)
267e  2147f3    ld      hl,#f347
2681  e5        push    hl
2682  215ff4    ld      hl,#f45f
2685  e5        push    hl
2686  cdd9ba    call    #bad9
2689  ca3426    jp      z,#2634
268c  2e71      ld      l,#71
268e  cf        rst     #8
268f  215ff4    ld      hl,#f45f
2692  e5        push    hl
2693  2147f3    ld      hl,#f347
2696  e5        push    hl
2697  df        rst     #18
2698  f1        pop     af
2699  2e59      ld      l,#59
269b  cf        rst     #8
269c  3a68f4    ld      a,(#f468)
269f  6f        ld      l,a
26a0  e5        push    hl
26a1  2e10      ld      l,#10
26a3  e5        push    hl
26a4  215ff4    ld      hl,#f45f
26a7  cdc57f    call    #7fc5
26aa  2e72      ld      l,#72
26ac  cf        rst     #8
26ad  c33426    jp      #2634
26b0  e7        rst     #20
26b1  21f2ff    ld      hl,#fff2
26b4  39        add     hl,sp
26b5  f9        ld      sp,hl
26b6  dd7e04    ld      a,(ix+#04)
26b9  327ef4    ld      (#f47e),a
26bc  dd36f300  ld      (ix-#0d),#00
26c0  3a7ef4    ld      a,(#f47e)
26c3  fe6c      cp      #6c
26c5  2010      jr      nz,#26d7        ; (16)
26c7  2171f4    ld      hl,#f471
26ca  e5        push    hl
26cb  213d04    ld      hl,#043d
26ce  e5        push    hl
26cf  df        rst     #18
26d0  f1        pop     af
26d1  dd36f91f  ld      (ix-#07),#1f
26d5  1813      jr      #26ea           ; (19)
26d7  2171f4    ld      hl,#f471
26da  e5        push    hl
26db  21d4f0    ld      hl,#f0d4
26de  e5        push    hl
26df  df        rst     #18
26e0  f1        pop     af
26e1  3ad9f0    ld      a,(#f0d9)
26e4  c6ff      add     a,#ff
26e6  6f        ld      l,a
26e7  dd75f9    ld      (ix-#07),l
26ea  219cf1    ld      hl,#f19c
26ed  e5        push    hl
26ee  3a7ef4    ld      a,(#f47e)
26f1  fe7e      cp      #7e
26f3  2009      jr      nz,#26fe        ; (9)
26f5  2139f1    ld      hl,#f139
26f8  1135f9    ld      de,#f935
26fb  ff        rst     #38
26fc  1807      jr      #2705           ; (7)
26fe  21c1f0    ld      hl,#f0c1
2701  1135f9    ld      de,#f935
2704  ff        rst     #38
2705  2135f9    ld      hl,#f935
2708  e5        push    hl
2709  df        rst     #18
270a  f1        pop     af
270b  97        sub     a
270c  dd77f4    ld      (ix-#0c),a
270f  dd77f5    ld      (ix-#0b),a
2712  dd77f6    ld      (ix-#0a),a
2715  dd77f7    ld      (ix-#09),a
2718  3275f4    ld      (#f475),a
271b  3276f4    ld      (#f476),a
271e  dd7ef9    ld      a,(ix-#07)
2721  5f        ld      e,a
2722  87        add     a,a
2723  9f        sbc     a,a
2724  57        ld      d,a
2725  3a75f4    ld      a,(#f475)
2728  93        sub     e
2729  3a76f4    ld      a,(#f476)
272c  9a        sbc     a,d
272d  f24027    jp      p,#2740
2730  cdef28    call    #28ef
2733  dd71f2    ld      (ix-#0e),c
2736  dd7ef2    ld      a,(ix-#0e)
2739  fe02      cp      #02
273b  2012      jr      nz,#274f        ; (18)
273d  c32728    jp      #2827
2740  dd4ef3    ld      c,(ix-#0d)
2743  c384be    jp      #be84
2746  2a75f4    ld      hl,(#f475)
2749  23        inc     hl
274a  2275f4    ld      (#f475),hl
274d  18cf      jr      #271e           ; (-49)
274f  dd7ef3    ld      a,(ix-#0d)
2752  ddb6f2    or      (ix-#0e)
2755  dd77f3    ld      (ix-#0d),a
2758  216df4    ld      hl,#f46d
275b  7e        ld      a,(hl)
275c  23        inc     hl
275d  b6        or      (hl)
275e  23        inc     hl
275f  b6        or      (hl)
2760  23        inc     hl
2761  b6        or      (hl)
2762  28e2      jr      z,#2746         ; (-30)
2764  dd7ef9    ld      a,(ix-#07)
2767  327cf4    ld      (#f47c),a
276a  87        add     a,a
276b  9f        sbc     a,a
276c  327df4    ld      (#f47d),a
276f  2175f4    ld      hl,#f475
2772  3a7cf4    ld      a,(#f47c)
2775  96        sub     (hl)
2776  3a7df4    ld      a,(#f47d)
2779  23        inc     hl
277a  9e        sbc     a,(hl)
277b  fa4627    jp      m,#2746
277e  2a7cf4    ld      hl,(#f47c)
2781  29        add     hl,hl
2782  29        add     hl,hl
2783  013d03    ld      bc,#033d
2786  09        add     hl,bc
2787  1135f9    ld      de,#f935
278a  ff        rst     #38
278b  2135f9    ld      hl,#f935
278e  e5        push    hl
278f  216df4    ld      hl,#f46d
2792  e5        push    hl
2793  cd8dba    call    #ba8d
2796  e1        pop     hl
2797  7e        ld      a,(hl)
2798  23        inc     hl
2799  b6        or      (hl)
279a  23        inc     hl
279b  b6        or      (hl)
279c  23        inc     hl
279d  b6        or      (hl)
279e  2836      jr      z,#27d6         ; (54)
27a0  2175f4    ld      hl,#f475
27a3  3a7cf4    ld      a,(#f47c)
27a6  be        cp      (hl)
27a7  2005      jr      nz,#27ae        ; (5)
27a9  3a7df4    ld      a,(#f47d)
27ac  23        inc     hl
27ad  be        cp      (hl)
27ae  2039      jr      nz,#27e9        ; (57)
27b0  2a75f4    ld      hl,(#f475)
27b3  29        add     hl,hl
27b4  29        add     hl,hl
27b5  013d03    ld      bc,#033d
27b8  09        add     hl,bc
27b9  1135f9    ld      de,#f935
27bc  ff        rst     #38
27bd  2135f9    ld      hl,#f935
27c0  e5        push    hl
27c1  dde5      push    ix
27c3  c1        pop     bc
27c4  21f4ff    ld      hl,#fff4
27c7  09        add     hl,bc
27c8  e5        push    hl
27c9  cd8dba    call    #ba8d
27cc  e1        pop     hl
27cd  7e        ld      a,(hl)
27ce  23        inc     hl
27cf  b6        or      (hl)
27d0  23        inc     hl
27d1  b6        or      (hl)
27d2  23        inc     hl
27d3  b6        or      (hl)
27d4  2813      jr      z,#27e9         ; (19)
27d6  3a7cf4    ld      a,(#f47c)
27d9  d601      sub     #01
27db  327cf4    ld      (#f47c),a
27de  3a7df4    ld      a,(#f47d)
27e1  de00      sbc     a,#00
27e3  327df4    ld      (#f47d),a
27e6  c36f27    jp      #276f
27e9  dde5      push    ix
27eb  c1        pop     bc
27ec  21f4ff    ld      hl,#fff4
27ef  09        add     hl,bc
27f0  e5        push    hl
27f1  2a7cf4    ld      hl,(#f47c)
27f4  29        add     hl,hl
27f5  29        add     hl,hl
27f6  013d03    ld      bc,#033d
27f9  09        add     hl,bc
27fa  1135f9    ld      de,#f935
27fd  ff        rst     #38
27fe  2135f9    ld      hl,#f935
2801  e5        push    hl
2802  2a75f4    ld      hl,(#f475)
2805  29        add     hl,hl
2806  29        add     hl,hl
2807  013d03    ld      bc,#033d
280a  09        add     hl,bc
280b  e5        push    hl
280c  cdd4bd    call    #bdd4
280f  cdd4bd    call    #bdd4
2812  f1        pop     af
2813  217929    ld      hl,#2979
2816  e5        push    hl
2817  21082a    ld      hl,#2a08
281a  cd84b1    call    #b184
281d  dd71f2    ld      (ix-#0e),c
2820  dd7ef2    ld      a,(ix-#0e)
2823  fe02      cp      #02
2825  2005      jr      nz,#282c        ; (5)
2827  0e02      ld      c,#02
2829  c384be    jp      #be84
282c  dd7ef3    ld      a,(ix-#0d)
282f  ddb6f2    or      (ix-#0e)
2832  dd77f3    ld      (ix-#0d),a
2835  c3d627    jp      #27d6
2838  f7        rst     #30
2839  f5        push    af
283a  f5        push    af
283b  f5        push    af
283c  f5        push    af
283d  dd36f900  ld      (ix-#07),#00
2841  3a7ef4    ld      a,(#f47e)
2844  fe6c      cp      #6c
2846  201b      jr      nz,#2863        ; (27)
2848  219cf1    ld      hl,#f19c
284b  e5        push    hl
284c  2177f4    ld      hl,#f477
284f  e5        push    hl
2850  df        rst     #18
2851  f1        pop     af
2852  2e09      ld      l,#09
2854  cd1d8b    call    #8b1d
2857  dd71f8    ld      (ix-#08),c
285a  dd7ef8    ld      a,(ix-#08)
285d  fe02      cp      #02
285f  2024      jr      nz,#2885        ; (36)
2861  183d      jr      #28a0           ; (61)
2863  2198f1    ld      hl,#f198
2866  e5        push    hl
2867  2177f4    ld      hl,#f477
286a  e5        push    hl
286b  df        rst     #18
286c  f1        pop     af
286d  3a7ef4    ld      a,(#f47e)
2870  fe7e      cp      #7e
2872  201d      jr      nz,#2891        ; (29)
2874  2e03      ld      l,#03
2876  cd1d8b    call    #8b1d
2879  dd71f8    ld      (ix-#08),c
287c  dd7ef8    ld      a,(ix-#08)
287f  fe02      cp      #02
2881  2022      jr      nz,#28a5        ; (34)
2883  181b      jr      #28a0           ; (27)
2885  dd7ef9    ld      a,(ix-#07)
2888  ddb6f8    or      (ix-#08)
288b  dd77f9    ld      (ix-#07),a
288e  c3e928    jp      #28e9
2891  2e07      ld      l,#07
2893  cd1d8b    call    #8b1d
2896  dd71f8    ld      (ix-#08),c
2899  dd7ef8    ld      a,(ix-#08)
289c  fe02      cp      #02
289e  2040      jr      nz,#28e0        ; (64)
28a0  0e02      ld      c,#02
28a2  c372be    jp      #be72
28a5  dd7ef9    ld      a,(ix-#07)
28a8  ddb6f8    or      (ix-#08)
28ab  dd77f9    ld      (ix-#07),a
28ae  2e05      ld      l,#05
28b0  cd1d8b    call    #8b1d
28b3  dd71f8    ld      (ix-#08),c
28b6  dd7ef8    ld      a,(ix-#08)
28b9  fe02      cp      #02
28bb  28e3      jr      z,#28a0         ; (-29)
28bd  dd7ef9    ld      a,(ix-#07)
28c0  ddb6f8    or      (ix-#08)
28c3  dd77f9    ld      (ix-#07),a
28c6  2147f3    ld      hl,#f347
28c9  e5        push    hl
28ca  2177f4    ld      hl,#f477
28cd  1135f9    ld      de,#f935
28d0  ff        rst     #38
28d1  2135f9    ld      hl,#f935
28d4  e5        push    hl
28d5  2198f1    ld      hl,#f198
28d8  e5        push    hl
28d9  cd23be    call    #be23
28dc  df        rst     #18
28dd  f1        pop     af
28de  1809      jr      #28e9           ; (9)
28e0  dd7ef9    ld      a,(ix-#07)
28e3  ddb6f8    or      (ix-#08)
28e6  dd77f9    ld      (ix-#07),a
28e9  dd4ef9    ld      c,(ix-#07)
28ec  c372be    jp      #be72
28ef  f7        rst     #30
28f0  f5        push    af
28f1  f5        push    af
28f2  f5        push    af
28f3  f5        push    af
28f4  dd36f900  ld      (ix-#07),#00
28f8  2177f4    ld      hl,#f477
28fb  e5        push    hl
28fc  2a75f4    ld      hl,(#f475)
28ff  29        add     hl,hl
2900  29        add     hl,hl
2901  013d03    ld      bc,#033d
2904  09        add     hl,bc
2905  e5        push    hl
2906  df        rst     #18
2907  f1        pop     af
2908  cd3828    call    #2838
290b  dd71f8    ld      (ix-#08),c
290e  dd7ef8    ld      a,(ix-#08)
2911  fe02      cp      #02
2913  2838      jr      z,#294d         ; (56)
2915  dd7ef9    ld      a,(ix-#07)
2918  ddb6f8    or      (ix-#08)
291b  dd77f9    ld      (ix-#07),a
291e  216df4    ld      hl,#f46d
2921  e5        push    hl
2922  2147f3    ld      hl,#f347
2925  e5        push    hl
2926  df        rst     #18
2927  f1        pop     af
2928  2177f4    ld      hl,#f477
292b  e5        push    hl
292c  2171f4    ld      hl,#f471
292f  1135f9    ld      de,#f935
2932  ff        rst     #38
2933  2135f9    ld      hl,#f935
2936  e5        push    hl
2937  2177f4    ld      hl,#f477
293a  e5        push    hl
293b  cd23be    call    #be23
293e  df        rst     #18
293f  f1        pop     af
2940  cd3828    call    #2838
2943  dd71f8    ld      (ix-#08),c
2946  dd7ef8    ld      a,(ix-#08)
2949  fe02      cp      #02
294b  2005      jr      nz,#2952        ; (5)
294d  0e02      ld      c,#02
294f  c372be    jp      #be72
2952  dd7ef9    ld      a,(ix-#07)
2955  ddb6f8    or      (ix-#08)
2958  dd77f9    ld      (ix-#07),a
295b  216df4    ld      hl,#f46d
295e  e5        push    hl
295f  2147f3    ld      hl,#f347
2962  e5        push    hl
2963  cdd4bd    call    #bdd4
2966  f1        pop     af
2967  dd4ef9    ld      c,(ix-#07)
296a  c372be    jp      #be72
296d  2041      jr      nz,#29b0        ; (65)
296f  4e        ld      c,(hl)
2970  44        ld      b,h
2971  2000      jr      nz,#2973        ; (0)
2973  42        ld      b,d
2974  49        ld      c,c
2975  54        ld      d,h
2976  53        ld      d,e
2977  2000      jr      nz,#2979        ; (0)
2979  e7        rst     #20
297a  dd7e04    ld      a,(ix+#04)
297d  b7        or      a
297e  cae129    jp      z,#29e1
2981  2e71      ld      l,#71
2983  cf        rst     #8
2984  2e58      ld      l,#58
2986  cf        rst     #8
2987  3a7ef4    ld      a,(#f47e)
298a  6f        ld      l,a
298b  d7        rst     #10
298c  217329    ld      hl,#2973
298f  ef        rst     #28
2990  2e60      ld      l,#60
2992  d7        rst     #10
2993  3a75f4    ld      a,(#f475)
2996  32c7f0    ld      (#f0c7),a
2999  2e01      ld      l,#01
299b  e5        push    hl
299c  2e0a      ld      l,#0a
299e  e5        push    hl
299f  21c5f0    ld      hl,#f0c5
29a2  cdc57f    call    #7fc5
29a5  217cf4    ld      hl,#f47c
29a8  3a75f4    ld      a,(#f475)
29ab  be        cp      (hl)
29ac  2005      jr      nz,#29b3        ; (5)
29ae  3a76f4    ld      a,(#f476)
29b1  23        inc     hl
29b2  be        cp      (hl)
29b3  2819      jr      z,#29ce         ; (25)
29b5  216d29    ld      hl,#296d
29b8  ef        rst     #28
29b9  2e60      ld      l,#60
29bb  d7        rst     #10
29bc  3a7cf4    ld      a,(#f47c)
29bf  32c7f0    ld      (#f0c7),a
29c2  2e01      ld      l,#01
29c4  e5        push    hl
29c5  2e0a      ld      l,#0a
29c7  e5        push    hl
29c8  21c5f0    ld      hl,#f0c5
29cb  cdc57f    call    #7fc5
29ce  2e63      ld      l,#63
29d0  d7        rst     #10
29d1  3e70      ld      a,#70
29d3  327bf4    ld      (#f47b),a
29d6  6f        ld      l,a
29d7  d7        rst     #10
29d8  2e7d      ld      l,#7d
29da  d7        rst     #10
29db  2e72      ld      l,#72
29dd  cf        rst     #8
29de  cdd0b8    call    #b8d0
29e1  dd7e04    ld      a,(ix+#04)
29e4  5f        ld      e,a
29e5  87        add     a,a
29e6  9f        sbc     a,a
29e7  57        ld      d,a
29e8  7b        ld      a,e
29e9  f680      or      #80
29eb  5f        ld      e,a
29ec  b2        or      d
29ed  2804      jr      z,#29f3         ; (4)
29ef  0e0a      ld      c,#0a
29f1  1802      jr      #29f5           ; (2)
29f3  0e10      ld      c,#10
29f5  69        ld      l,c
29f6  cd7c76    call    #767c
29f9  79        ld      a,c
29fa  b7        or      a
29fb  28e4      jr      z,#29e1         ; (-28)
29fd  2e7f      ld      l,#7f
29ff  e5        push    hl
2a00  2eff      ld      l,#ff
2a02  cd657f    call    #7f65
2a05  c384be    jp      #be84
2a08  f7        rst     #30
2a09  f5        push    af
2a0a  f5        push    af
2a0b  f5        push    af
2a0c  f5        push    af
2a0d  dd36f900  ld      (ix-#07),#00
2a11  cdef28    call    #28ef
2a14  dd71f8    ld      (ix-#08),c
2a17  dd7ef8    ld      a,(ix-#08)
2a1a  fe02      cp      #02
2a1c  2005      jr      nz,#2a23        ; (5)
2a1e  0e02      ld      c,#02
2a20  c372be    jp      #be72
2a23  dd7ef9    ld      a,(ix-#07)
2a26  ddb6f8    or      (ix-#08)
2a29  dd77f9    ld      (ix-#07),a
2a2c  2a7cf4    ld      hl,(#f47c)
2a2f  29        add     hl,hl
2a30  29        add     hl,hl
2a31  013d03    ld      bc,#033d
2a34  09        add     hl,bc
2a35  1135f9    ld      de,#f935
2a38  ff        rst     #38
2a39  2135f9    ld      hl,#f935
2a3c  e5        push    hl
2a3d  216df4    ld      hl,#f46d
2a40  e5        push    hl
2a41  cd8dba    call    #ba8d
2a44  e1        pop     hl
2a45  7e        ld      a,(hl)
2a46  23        inc     hl
2a47  b6        or      (hl)
2a48  23        inc     hl
2a49  b6        or      (hl)
2a4a  23        inc     hl
2a4b  b6        or      (hl)
2a4c  2818      jr      z,#2a66         ; (24)
2a4e  3a7bf4    ld      a,(#f47b)
2a51  fe70      cp      #70
2a53  2829      jr      z,#2a7e         ; (41)
2a55  cdd0b8    call    #b8d0
2a58  3e70      ld      a,#70
2a5a  327bf4    ld      (#f47b),a
2a5d  6f        ld      l,a
2a5e  e5        push    hl
2a5f  2efe      ld      l,#fe
2a61  cd657f    call    #7f65
2a64  1818      jr      #2a7e           ; (24)
2a66  3a7bf4    ld      a,(#f47b)
2a69  fe66      cp      #66
2a6b  2815      jr      z,#2a82         ; (21)
2a6d  cdd0b8    call    #b8d0
2a70  3e66      ld      a,#66
2a72  327bf4    ld      (#f47b),a
2a75  6f        ld      l,a
2a76  e5        push    hl
2a77  2efe      ld      l,#fe
2a79  cd657f    call    #7f65
2a7c  1804      jr      #2a82           ; (4)
2a7e  dd36f901  ld      (ix-#07),#01
2a82  dd4ef9    ld      c,(ix-#07)
2a85  c372be    jp      #be72
2a88  f7        rst     #30
2a89  f5        push    af
2a8a  f5        push    af
2a8b  f5        push    af
2a8c  f5        push    af
2a8d  dd36f900  ld      (ix-#07),#00
2a91  219cf1    ld      hl,#f19c
2a94  e5        push    hl
2a95  2139f1    ld      hl,#f139
2a98  e5        push    hl
2a99  df        rst     #18
2a9a  f1        pop     af
2a9b  2121f1    ld      hl,#f121
2a9e  e5        push    hl
2a9f  219cf1    ld      hl,#f19c
2aa2  e5        push    hl
2aa3  cdb0ba    call    #bab0
2aa6  382b      jr      c,#2ad3         ; (43)
2aa8  2198f1    ld      hl,#f198
2aab  e5        push    hl
2aac  219cf1    ld      hl,#f19c
2aaf  23        inc     hl
2ab0  23        inc     hl
2ab1  4e        ld      c,(hl)
2ab2  23        inc     hl
2ab3  46        ld      b,(hl)
2ab4  c5        push    bc
2ab5  2b        dec     hl
2ab6  2b        dec     hl
2ab7  2b        dec     hl
2ab8  4e        ld      c,(hl)
2ab9  23        inc     hl
2aba  46        ld      b,(hl)
2abb  c5        push    bc
2abc  e1        pop     hl
2abd  cdae2c    call    #2cae
2ac0  2e03      ld      l,#03
2ac2  cd1d8b    call    #8b1d
2ac5  dd71f8    ld      (ix-#08),c
2ac8  dd7ef8    ld      a,(ix-#08)
2acb  fe02      cp      #02
2acd  c2272b    jp      nz,#2b27
2ad0  c36b2c    jp      #2c6b
2ad3  2188f4    ld      hl,#f488
2ad6  e5        push    hl
2ad7  2139f1    ld      hl,#f139
2ada  e5        push    hl
2adb  df        rst     #18
2adc  f1        pop     af
2add  2188f4    ld      hl,#f488
2ae0  e5        push    hl
2ae1  2121f1    ld      hl,#f121
2ae4  e5        push    hl
2ae5  cdb0ba    call    #bab0
2ae8  d27c2c    jp      nc,#2c7c
2aeb  219cf1    ld      hl,#f19c
2aee  e5        push    hl
2aef  2188f4    ld      hl,#f488
2af2  e5        push    hl
2af3  df        rst     #18
2af4  f1        pop     af
2af5  2e05      ld      l,#05
2af7  cd1d8b    call    #8b1d
2afa  dd71f8    ld      (ix-#08),c
2afd  dd7ef8    ld      a,(ix-#08)
2b00  fe02      cp      #02
2b02  205f      jr      nz,#2b63        ; (95)
2b04  c36b2c    jp      #2c6b
2b07  219cf1    ld      hl,#f19c
2b0a  e5        push    hl
2b0b  3ab6f0    ld      a,(#f0b6)
2b0e  3237f9    ld      (#f937),a
2b11  87        add     a,a
2b12  9f        sbc     a,a
2b13  3238f9    ld      (#f938),a
2b16  3236f9    ld      (#f936),a
2b19  3235f9    ld      (#f935),a
2b1c  2135f9    ld      hl,#f935
2b1f  e5        push    hl
2b20  cd62ba    call    #ba62
2b23  f1        pop     af
2b24  c39b2a    jp      #2a9b
2b27  dd7ef9    ld      a,(ix-#07)
2b2a  ddb6f8    or      (ix-#08)
2b2d  dd77f9    ld      (ix-#07),a
2b30  3a9ef1    ld      a,(#f19e)
2b33  b7        or      a
2b34  20d1      jr      nz,#2b07        ; (-47)
2b36  2e01      ld      l,#01
2b38  cdceb2    call    #b2ce
2b3b  79        ld      a,c
2b3c  fe02      cp      #02
2b3e  20c7      jr      nz,#2b07        ; (-57)
2b40  c36b2c    jp      #2c6b
2b43  2188f4    ld      hl,#f488
2b46  e5        push    hl
2b47  3ab6f0    ld      a,(#f0b6)
2b4a  3237f9    ld      (#f937),a
2b4d  87        add     a,a
2b4e  9f        sbc     a,a
2b4f  3238f9    ld      (#f938),a
2b52  3236f9    ld      (#f936),a
2b55  3235f9    ld      (#f935),a
2b58  2135f9    ld      hl,#f935
2b5b  e5        push    hl
2b5c  cd62ba    call    #ba62
2b5f  f1        pop     af
2b60  c3dd2a    jp      #2add
2b63  dd7ef9    ld      a,(ix-#07)
2b66  ddb6f8    or      (ix-#08)
2b69  dd77f9    ld      (ix-#07),a
2b6c  3a9ef1    ld      a,(#f19e)
2b6f  b7        or      a
2b70  200b      jr      nz,#2b7d        ; (11)
2b72  2e01      ld      l,#01
2b74  cdceb2    call    #b2ce
2b77  79        ld      a,c
2b78  fe02      cp      #02
2b7a  ca6b2c    jp      z,#2c6b
2b7d  2183f4    ld      hl,#f483
2b80  e5        push    hl
2b81  2188f4    ld      hl,#f488
2b84  23        inc     hl
2b85  23        inc     hl
2b86  4e        ld      c,(hl)
2b87  23        inc     hl
2b88  46        ld      b,(hl)
2b89  c5        push    bc
2b8a  2b        dec     hl
2b8b  2b        dec     hl
2b8c  2b        dec     hl
2b8d  4e        ld      c,(hl)
2b8e  23        inc     hl
2b8f  46        ld      b,(hl)
2b90  c5        push    bc
2b91  e1        pop     hl
2b92  cdae2c    call    #2cae
2b95  2183f4    ld      hl,#f483
2b98  e5        push    hl
2b99  2198f1    ld      hl,#f198
2b9c  e5        push    hl
2b9d  cdd9ba    call    #bad9
2ba0  28a1      jr      z,#2b43         ; (-95)
2ba2  3ab6f0    ld      a,(#f0b6)
2ba5  c6ff      add     a,#ff
2ba7  6f        ld      l,a
2ba8  7d        ld      a,l
2ba9  3287f4    ld      (#f487),a
2bac  3a87f4    ld      a,(#f487)
2baf  fe20      cp      #20
2bb1  f2432b    jp      p,#2b43
2bb4  2e01      ld      l,#01
2bb6  cdceb2    call    #b2ce
2bb9  79        ld      a,c
2bba  fe02      cp      #02
2bbc  200d      jr      nz,#2bcb        ; (13)
2bbe  c36b2c    jp      #2c6b
2bc1  3a87f4    ld      a,(#f487)
2bc4  c601      add     a,#01
2bc6  3287f4    ld      (#f487),a
2bc9  18e1      jr      #2bac           ; (-31)
2bcb  217ff4    ld      hl,#f47f
2bce  e5        push    hl
2bcf  3a87f4    ld      a,(#f487)
2bd2  4f        ld      c,a
2bd3  87        add     a,a
2bd4  9f        sbc     a,a
2bd5  47        ld      b,a
2bd6  69        ld      l,c
2bd7  60        ld      h,b
2bd8  29        add     hl,hl
2bd9  29        add     hl,hl
2bda  013d03    ld      bc,#033d
2bdd  09        add     hl,bc
2bde  e5        push    hl
2bdf  df        rst     #18
2be0  e1        pop     hl
2be1  1135f9    ld      de,#f935
2be4  ff        rst     #38
2be5  2135f9    ld      hl,#f935
2be8  e5        push    hl
2be9  2188f4    ld      hl,#f488
2bec  e5        push    hl
2bed  cd8dba    call    #ba8d
2bf0  e1        pop     hl
2bf1  7e        ld      a,(hl)
2bf2  23        inc     hl
2bf3  b6        or      (hl)
2bf4  23        inc     hl
2bf5  b6        or      (hl)
2bf6  23        inc     hl
2bf7  b6        or      (hl)
2bf8  20c7      jr      nz,#2bc1        ; (-57)
2bfa  2121f1    ld      hl,#f121
2bfd  e5        push    hl
2bfe  218df4    ld      hl,#f48d
2c01  e5        push    hl
2c02  2188f4    ld      hl,#f488
2c05  1135f9    ld      de,#f935
2c08  ff        rst     #38
2c09  2135f9    ld      hl,#f935
2c0c  e5        push    hl
2c0d  217ff4    ld      hl,#f47f
2c10  e5        push    hl
2c11  cdd4bd    call    #bdd4
2c14  df        rst     #18
2c15  cdb0ba    call    #bab0
2c18  da432b    jp      c,#2b43
2c1b  2191f4    ld      hl,#f491
2c1e  e5        push    hl
2c1f  218df4    ld      hl,#f48d
2c22  23        inc     hl
2c23  23        inc     hl
2c24  4e        ld      c,(hl)
2c25  23        inc     hl
2c26  46        ld      b,(hl)
2c27  c5        push    bc
2c28  2b        dec     hl
2c29  2b        dec     hl
2c2a  2b        dec     hl
2c2b  4e        ld      c,(hl)
2c2c  23        inc     hl
2c2d  46        ld      b,(hl)
2c2e  c5        push    bc
2c2f  e1        pop     hl
2c30  cdae2c    call    #2cae
2c33  cdc02e    call    #2ec0
2c36  dd71f8    ld      (ix-#08),c
2c39  dd7ef8    ld      a,(ix-#08)
2c3c  fe02      cp      #02
2c3e  282b      jr      z,#2c6b         ; (43)
2c40  dd7ef9    ld      a,(ix-#07)
2c43  ddb6f8    or      (ix-#08)
2c46  dd77f9    ld      (ix-#07),a
2c49  2198f1    ld      hl,#f198
2c4c  e5        push    hl
2c4d  2183f4    ld      hl,#f483
2c50  e5        push    hl
2c51  cdd9ba    call    #bad9
2c54  cac12b    jp      z,#2bc1
2c57  21e62d    ld      hl,#2de6
2c5a  e5        push    hl
2c5b  21532e    ld      hl,#2e53
2c5e  cd84b1    call    #b184
2c61  dd71f8    ld      (ix-#08),c
2c64  dd7ef8    ld      a,(ix-#08)
2c67  fe02      cp      #02
2c69  2005      jr      nz,#2c70        ; (5)
2c6b  0e02      ld      c,#02
2c6d  c372be    jp      #be72
2c70  dd7ef9    ld      a,(ix-#07)
2c73  ddb6f8    or      (ix-#08)
2c76  dd77f9    ld      (ix-#07),a
2c79  c3c12b    jp      #2bc1
2c7c  dd4ef9    ld      c,(ix-#07)
2c7f  c372be    jp      #be72
2c82  010204    ld      bc,#0402
2c85  08        ex      af,af'
2c86  1020      djnz    #2ca8           ; (32)
2c88  40        ld      b,b
2c89  80        add     a,b
2c8a  96        sub     (hl)
2c8b  69        ld      l,c
2c8c  69        ld      l,c
2c8d  96        sub     (hl)
2c8e  69        ld      l,c
2c8f  96        sub     (hl)
2c90  96        sub     (hl)
2c91  69        ld      l,c
2c92  69        ld      l,c
2c93  96        sub     (hl)
2c94  96        sub     (hl)
2c95  69        ld      l,c
2c96  96        sub     (hl)
2c97  69        ld      l,c
2c98  69        ld      l,c
2c99  96        sub     (hl)
2c9a  69        ld      l,c
2c9b  96        sub     (hl)
2c9c  96        sub     (hl)
2c9d  69        ld      l,c
2c9e  96        sub     (hl)
2c9f  69        ld      l,c
2ca0  69        ld      l,c
2ca1  96        sub     (hl)
2ca2  96        sub     (hl)
2ca3  69        ld      l,c
2ca4  69        ld      l,c
2ca5  96        sub     (hl)
2ca6  69        ld      l,c
2ca7  96        sub     (hl)
2ca8  96        sub     (hl)
2ca9  69        ld      l,c
2caa  00        nop     
2cab  00        nop     
2cac  00        nop     
2cad  00        nop     
2cae  e7        rst     #20
2caf  21f2ff    ld      hl,#fff2
2cb2  39        add     hl,sp
2cb3  f9        ld      sp,hl
2cb4  dd6e08    ld      l,(ix+#08)
2cb7  dd6609    ld      h,(ix+#09)
2cba  e5        push    hl
2cbb  dde5      push    ix
2cbd  c1        pop     bc
2cbe  210400    ld      hl,#0004
2cc1  09        add     hl,bc
2cc2  e5        push    hl
2cc3  df        rst     #18
2cc4  f1        pop     af
2cc5  dde5      push    ix
2cc7  c1        pop     bc
2cc8  210400    ld      hl,#0004
2ccb  09        add     hl,bc
2ccc  e5        push    hl
2ccd  3ad9f0    ld      a,(#f0d9)
2cd0  6f        ld      l,a
2cd1  4d        ld      c,l
2cd2  97        sub     a
2cd3  47        ld      b,a
2cd4  c5        push    bc
2cd5  cd0fbd    call    #bd0f
2cd8  e1        pop     hl
2cd9  7e        ld      a,(hl)
2cda  23        inc     hl
2cdb  b6        or      (hl)
2cdc  23        inc     hl
2cdd  b6        or      (hl)
2cde  23        inc     hl
2cdf  b6        or      (hl)
2ce0  2815      jr      z,#2cf7         ; (21)
2ce2  dd6e08    ld      l,(ix+#08)
2ce5  dd6609    ld      h,(ix+#09)
2ce8  e5        push    hl
2ce9  dde5      push    ix
2ceb  c1        pop     bc
2cec  210400    ld      hl,#0004
2cef  09        add     hl,bc
2cf0  e5        push    hl
2cf1  cd62ba    call    #ba62
2cf4  f1        pop     af
2cf5  18ce      jr      #2cc5           ; (-50)
2cf7  dd6e08    ld      l,(ix+#08)
2cfa  dd6609    ld      h,(ix+#09)
2cfd  e5        push    hl
2cfe  21d4f0    ld      hl,#f0d4
2d01  e5        push    hl
2d02  cd8dba    call    #ba8d
2d05  f1        pop     af
2d06  97        sub     a
2d07  3295f4    ld      (#f495),a
2d0a  3296f4    ld      (#f496),a
2d0d  3a96f4    ld      a,(#f496)
2d10  fe04      cp      #04
2d12  d2662d    jp      nc,#2d66
2d15  dd6e08    ld      l,(ix+#08)
2d18  dd6609    ld      h,(ix+#09)
2d1b  3a96f4    ld      a,(#f496)
2d1e  5f        ld      e,a
2d1f  97        sub     a
2d20  57        ld      d,a
2d21  19        add     hl,de
2d22  7e        ld      a,(hl)
2d23  3297f4    ld      (#f497),a
2d26  4f        ld      c,a
2d27  97        sub     a
2d28  47        ld      b,a
2d29  c5        push    bc
2d2a  210300    ld      hl,#0003
2d2d  e5        push    hl
2d2e  cddeb9    call    #b9de
2d31  e1        pop     hl
2d32  018a2c    ld      bc,#2c8a
2d35  09        add     hl,bc
2d36  6e        ld      l,(hl)
2d37  e5        push    hl
2d38  3a97f4    ld      a,(#f497)
2d3b  e607      and     #07
2d3d  6f        ld      l,a
2d3e  4d        ld      c,l
2d3f  97        sub     a
2d40  47        ld      b,a
2d41  69        ld      l,c
2d42  60        ld      h,b
2d43  01822c    ld      bc,#2c82
2d46  09        add     hl,bc
2d47  c1        pop     bc
2d48  79        ld      a,c
2d49  a6        and     (hl)
2d4a  2805      jr      z,#2d51         ; (5)
2d4c  010100    ld      bc,#0001
2d4f  1803      jr      #2d54           ; (3)
2d51  010000    ld      bc,#0000
2d54  3a95f4    ld      a,(#f495)
2d57  a9        xor     c
2d58  3295f4    ld      (#f495),a
2d5b  3a96f4    ld      a,(#f496)
2d5e  c601      add     a,#01
2d60  3296f4    ld      (#f496),a
2d63  c30d2d    jp      #2d0d
2d66  3a95f4    ld      a,(#f495)
2d69  b7        or      a
2d6a  cad02d    jp      z,#2dd0
2d6d  dd6e08    ld      l,(ix+#08)
2d70  dd6609    ld      h,(ix+#09)
2d73  e5        push    hl
2d74  dd6e08    ld      l,(ix+#08)
2d77  dd6609    ld      h,(ix+#09)
2d7a  1135f9    ld      de,#f935
2d7d  ff        rst     #38
2d7e  2135f9    ld      hl,#f935
2d81  e5        push    hl
2d82  210100    ld      hl,#0001
2d85  e5        push    hl
2d86  cd0fbd    call    #bd0f
2d89  21d4f0    ld      hl,#f0d4
2d8c  e5        push    hl
2d8d  cd23be    call    #be23
2d90  dde5      push    ix
2d92  c1        pop     bc
2d93  21f2ff    ld      hl,#fff2
2d96  09        add     hl,bc
2d97  5d        ld      e,l
2d98  54        ld      d,h
2d99  e1        pop     hl
2d9a  d5        push    de
2d9b  cd0db9    call    #b90d
2d9e  dd6e08    ld      l,(ix+#08)
2da1  dd6609    ld      h,(ix+#09)
2da4  23        inc     hl
2da5  23        inc     hl
2da6  7e        ld      a,(hl)
2da7  e601      and     #01
2da9  2809      jr      z,#2db4         ; (9)
2dab  21aa2c    ld      hl,#2caa
2dae  1135f9    ld      de,#f935
2db1  ff        rst     #38
2db2  1813      jr      #2dc7           ; (19)
2db4  3ad9f0    ld      a,(#f0d9)
2db7  87        add     a,a
2db8  87        add     a,a
2db9  6f        ld      l,a
2dba  4d        ld      c,l
2dbb  97        sub     a
2dbc  47        ld      b,a
2dbd  69        ld      l,c
2dbe  60        ld      h,b
2dbf  013903    ld      bc,#0339
2dc2  09        add     hl,bc
2dc3  1135f9    ld      de,#f935
2dc6  ff        rst     #38
2dc7  2135f9    ld      hl,#f935
2dca  e5        push    hl
2dcb  cdd4bd    call    #bdd4
2dce  df        rst     #18
2dcf  f1        pop     af
2dd0  c393be    jp      #be93
2dd3  2042      jr      nz,#2e17        ; (66)
2dd5  49        ld      c,c
2dd6  54        ld      d,h
2dd7  2000      jr      nz,#2dd9        ; (0)
2dd9  2040      jr      nz,#2e1b        ; (64)
2ddb  2000      jr      nz,#2ddd        ; (0)
2ddd  52        ld      d,d
2dde  41        ld      b,c
2ddf  4d        ld      c,l
2de0  2044      jr      nz,#2e26        ; (68)
2de2  43        ld      b,e
2de3  44        ld      b,h
2de4  2000      jr      nz,#2de6        ; (0)
2de6  e7        rst     #20
2de7  dd7e04    ld      a,(ix+#04)
2dea  b7        or      a
2deb  ca342e    jp      z,#2e34
2dee  2e71      ld      l,#71
2df0  cf        rst     #8
2df1  2e58      ld      l,#58
2df3  cf        rst     #8
2df4  21dd2d    ld      hl,#2ddd
2df7  ef        rst     #28
2df8  3e67      ld      a,#67
2dfa  328cf4    ld      (#f48c),a
2dfd  6f        ld      l,a
2dfe  d7        rst     #10
2dff  21d92d    ld      hl,#2dd9
2e02  ef        rst     #28
2e03  2e60      ld      l,#60
2e05  d7        rst     #10
2e06  2e04      ld      l,#04
2e08  e5        push    hl
2e09  2e10      ld      l,#10
2e0b  e5        push    hl
2e0c  2188f4    ld      hl,#f488
2e0f  cdc57f    call    #7fc5
2e12  21d32d    ld      hl,#2dd3
2e15  ef        rst     #28
2e16  2e60      ld      l,#60
2e18  d7        rst     #10
2e19  3a87f4    ld      a,(#f487)
2e1c  32c7f0    ld      (#f0c7),a
2e1f  2e01      ld      l,#01
2e21  e5        push    hl
2e22  2e0a      ld      l,#0a
2e24  e5        push    hl
2e25  21c5f0    ld      hl,#f0c5
2e28  cdc57f    call    #7fc5
2e2b  2e7d      ld      l,#7d
2e2d  d7        rst     #10
2e2e  2e72      ld      l,#72
2e30  cf        rst     #8
2e31  cdd0b8    call    #b8d0
2e34  dd7e04    ld      a,(ix+#04)
2e37  b7        or      a
2e38  2804      jr      z,#2e3e         ; (4)
2e3a  0e0a      ld      c,#0a
2e3c  1802      jr      #2e40           ; (2)
2e3e  0e10      ld      c,#10
2e40  69        ld      l,c
2e41  cd7c76    call    #767c
2e44  79        ld      a,c
2e45  b7        or      a
2e46  28ec      jr      z,#2e34         ; (-20)
2e48  2e7f      ld      l,#7f
2e4a  e5        push    hl
2e4b  2eff      ld      l,#ff
2e4d  cd657f    call    #7f65
2e50  c384be    jp      #be84
2e53  f7        rst     #30
2e54  f5        push    af
2e55  f5        push    af
2e56  f5        push    af
2e57  f5        push    af
2e58  dd36f900  ld      (ix-#07),#00
2e5c  cdc02e    call    #2ec0
2e5f  dd71f8    ld      (ix-#08),c
2e62  dd7ef8    ld      a,(ix-#08)
2e65  fe02      cp      #02
2e67  2005      jr      nz,#2e6e        ; (5)
2e69  0e02      ld      c,#02
2e6b  c372be    jp      #be72
2e6e  dd7ef9    ld      a,(ix-#07)
2e71  ddb6f8    or      (ix-#08)
2e74  dd77f9    ld      (ix-#07),a
2e77  2198f1    ld      hl,#f198
2e7a  e5        push    hl
2e7b  2183f4    ld      hl,#f483
2e7e  e5        push    hl
2e7f  cdd9ba    call    #bad9
2e82  2018      jr      nz,#2e9c        ; (24)
2e84  3a8cf4    ld      a,(#f48c)
2e87  fe6b      cp      #6b
2e89  282f      jr      z,#2eba         ; (47)
2e8b  3e6b      ld      a,#6b
2e8d  328cf4    ld      (#f48c),a
2e90  6f        ld      l,a
2e91  e5        push    hl
2e92  2e0a      ld      l,#0a
2e94  cd657f    call    #7f65
2e97  cdd0b8    call    #b8d0
2e9a  181e      jr      #2eba           ; (30)
2e9c  dd7ef9    ld      a,(ix-#07)
2e9f  f601      or      #01
2ea1  dd77f9    ld      (ix-#07),a
2ea4  3a8cf4    ld      a,(#f48c)
2ea7  fe67      cp      #67
2ea9  280f      jr      z,#2eba         ; (15)
2eab  3e67      ld      a,#67
2ead  328cf4    ld      (#f48c),a
2eb0  6f        ld      l,a
2eb1  e5        push    hl
2eb2  2e0a      ld      l,#0a
2eb4  cd657f    call    #7f65
2eb7  cdd0b8    call    #b8d0
2eba  dd4ef9    ld      c,(ix-#07)
2ebd  c372be    jp      #be72
2ec0  f7        rst     #30
2ec1  f5        push    af
2ec2  f5        push    af
2ec3  f5        push    af
2ec4  f5        push    af
2ec5  dd36f900  ld      (ix-#07),#00
2ec9  219cf1    ld      hl,#f19c
2ecc  e5        push    hl
2ecd  2188f4    ld      hl,#f488
2ed0  e5        push    hl
2ed1  df        rst     #18
2ed2  f1        pop     af
2ed3  2198f1    ld      hl,#f198
2ed6  e5        push    hl
2ed7  2183f4    ld      hl,#f483
2eda  e5        push    hl
2edb  df        rst     #18
2edc  f1        pop     af
2edd  2e03      ld      l,#03
2edf  cd1d8b    call    #8b1d
2ee2  dd71f8    ld      (ix-#08),c
2ee5  dd7ef8    ld      a,(ix-#08)
2ee8  fe02      cp      #02
2eea  ca3b2f    jp      z,#2f3b
2eed  dd7ef9    ld      a,(ix-#07)
2ef0  ddb6f8    or      (ix-#08)
2ef3  dd77f9    ld      (ix-#07),a
2ef6  219cf1    ld      hl,#f19c
2ef9  e5        push    hl
2efa  218df4    ld      hl,#f48d
2efd  e5        push    hl
2efe  df        rst     #18
2eff  f1        pop     af
2f00  2198f1    ld      hl,#f198
2f03  e5        push    hl
2f04  2191f4    ld      hl,#f491
2f07  e5        push    hl
2f08  df        rst     #18
2f09  f1        pop     af
2f0a  2e03      ld      l,#03
2f0c  cd1d8b    call    #8b1d
2f0f  dd71f8    ld      (ix-#08),c
2f12  dd7ef8    ld      a,(ix-#08)
2f15  fe02      cp      #02
2f17  2822      jr      z,#2f3b         ; (34)
2f19  dd7ef9    ld      a,(ix-#07)
2f1c  ddb6f8    or      (ix-#08)
2f1f  dd77f9    ld      (ix-#07),a
2f22  219cf1    ld      hl,#f19c
2f25  e5        push    hl
2f26  2188f4    ld      hl,#f488
2f29  e5        push    hl
2f2a  df        rst     #18
2f2b  f1        pop     af
2f2c  2e05      ld      l,#05
2f2e  cd1d8b    call    #8b1d
2f31  dd71f8    ld      (ix-#08),c
2f34  dd7ef8    ld      a,(ix-#08)
2f37  fe02      cp      #02
2f39  2005      jr      nz,#2f40        ; (5)
2f3b  0e02      ld      c,#02
2f3d  c372be    jp      #be72
2f40  dd7ef9    ld      a,(ix-#07)
2f43  ddb6f8    or      (ix-#08)
2f46  dd77f9    ld      (ix-#07),a
2f49  dd4ef9    ld      c,(ix-#07)
2f4c  c372be    jp      #be72
2f4f  f7        rst     #30
2f50  f5        push    af
2f51  f5        push    af
2f52  f5        push    af
2f53  f5        push    af
2f54  dd36f900  ld      (ix-#07),#00
2f58  2198f4    ld      hl,#f498
2f5b  e5        push    hl
2f5c  2139f1    ld      hl,#f139
2f5f  e5        push    hl
2f60  df        rst     #18
2f61  f1        pop     af
2f62  2198f4    ld      hl,#f498
2f65  e5        push    hl
2f66  2121f1    ld      hl,#f121
2f69  e5        push    hl
2f6a  cdb0ba    call    #bab0
2f6d  3029      jr      nc,#2f98        ; (41)
2f6f  219cf1    ld      hl,#f19c
2f72  e5        push    hl
2f73  2198f4    ld      hl,#f498
2f76  e5        push    hl
2f77  df        rst     #18
2f78  f1        pop     af
2f79  97        sub     a
2f7a  3298f1    ld      (#f198),a
2f7d  3299f1    ld      (#f199),a
2f80  329af1    ld      (#f19a),a
2f83  329bf1    ld      (#f19b),a
2f86  2e03      ld      l,#03
2f88  cd1d8b    call    #8b1d
2f8b  dd71f8    ld      (ix-#08),c
2f8e  dd7ef8    ld      a,(ix-#08)
2f91  fe02      cp      #02
2f93  2029      jr      nz,#2fbe        ; (41)
2f95  c3ea30    jp      #30ea
2f98  dd4ef9    ld      c,(ix-#07)
2f9b  c372be    jp      #be72
2f9e  2198f4    ld      hl,#f498
2fa1  e5        push    hl
2fa2  3ab6f0    ld      a,(#f0b6)
2fa5  3237f9    ld      (#f937),a
2fa8  87        add     a,a
2fa9  9f        sbc     a,a
2faa  3238f9    ld      (#f938),a
2fad  3236f9    ld      (#f936),a
2fb0  3235f9    ld      (#f935),a
2fb3  2135f9    ld      hl,#f935
2fb6  e5        push    hl
2fb7  cd62ba    call    #ba62
2fba  f1        pop     af
2fbb  c3622f    jp      #2f62
2fbe  dd7ef9    ld      a,(ix-#07)
2fc1  ddb6f8    or      (ix-#08)
2fc4  dd77f9    ld      (ix-#07),a
2fc7  3a9ef1    ld      a,(#f19e)
2fca  e60f      and     #0f
2fcc  200b      jr      nz,#2fd9        ; (11)
2fce  2e01      ld      l,#01
2fd0  cdceb2    call    #b2ce
2fd3  79        ld      a,c
2fd4  fe02      cp      #02
2fd6  caea30    jp      z,#30ea
2fd9  3ab6f0    ld      a,(#f0b6)
2fdc  6f        ld      l,a
2fdd  7d        ld      a,l
2fde  87        add     a,a
2fdf  7d        ld      a,l
2fe0  1f        rra     
2fe1  6f        ld      l,a
2fe2  7d        ld      a,l
2fe3  329df4    ld      (#f49d),a
2fe6  3a9df4    ld      a,(#f49d)
2fe9  fe20      cp      #20
2feb  f29e2f    jp      p,#2f9e
2fee  21a2f4    ld      hl,#f4a2
2ff1  e5        push    hl
2ff2  3a9df4    ld      a,(#f49d)
2ff5  4f        ld      c,a
2ff6  87        add     a,a
2ff7  9f        sbc     a,a
2ff8  47        ld      b,a
2ff9  69        ld      l,c
2ffa  60        ld      h,b
2ffb  29        add     hl,hl
2ffc  29        add     hl,hl
2ffd  013d03    ld      bc,#033d
3000  09        add     hl,bc
3001  e5        push    hl
3002  df        rst     #18
3003  e1        pop     hl
3004  1135f9    ld      de,#f935
3007  ff        rst     #38
3008  2135f9    ld      hl,#f935
300b  e5        push    hl
300c  2198f4    ld      hl,#f498
300f  e5        push    hl
3010  cd8dba    call    #ba8d
3013  e1        pop     hl
3014  7e        ld      a,(hl)
3015  23        inc     hl
3016  b6        or      (hl)
3017  23        inc     hl
3018  b6        or      (hl)
3019  23        inc     hl
301a  b6        or      (hl)
301b  c26530    jp      nz,#3065
301e  2121f1    ld      hl,#f121
3021  e5        push    hl
3022  219ef4    ld      hl,#f49e
3025  e5        push    hl
3026  2198f4    ld      hl,#f498
3029  1135f9    ld      de,#f935
302c  ff        rst     #38
302d  2135f9    ld      hl,#f935
3030  e5        push    hl
3031  21a2f4    ld      hl,#f4a2
3034  e5        push    hl
3035  cdd4bd    call    #bdd4
3038  df        rst     #18
3039  cdb0ba    call    #bab0
303c  da9e2f    jp      c,#2f9e
303f  219cf1    ld      hl,#f19c
3042  e5        push    hl
3043  219ef4    ld      hl,#f49e
3046  e5        push    hl
3047  df        rst     #18
3048  f1        pop     af
3049  2198f1    ld      hl,#f198
304c  e5        push    hl
304d  21d4f0    ld      hl,#f0d4
3050  e5        push    hl
3051  df        rst     #18
3052  f1        pop     af
3053  2e03      ld      l,#03
3055  cd1d8b    call    #8b1d
3058  dd71f8    ld      (ix-#08),c
305b  dd7ef8    ld      a,(ix-#08)
305e  fe02      cp      #02
3060  200e      jr      nz,#3070        ; (14)
3062  c3ea30    jp      #30ea
3065  3a9df4    ld      a,(#f49d)
3068  c601      add     a,#01
306a  329df4    ld      (#f49d),a
306d  c3e62f    jp      #2fe6
3070  dd7ef9    ld      a,(ix-#07)
3073  ddb6f8    or      (ix-#08)
3076  dd77f9    ld      (ix-#07),a
3079  219cf1    ld      hl,#f19c
307c  e5        push    hl
307d  2198f4    ld      hl,#f498
3080  e5        push    hl
3081  df        rst     #18
3082  f1        pop     af
3083  2e05      ld      l,#05
3085  cd1d8b    call    #8b1d
3088  dd71f8    ld      (ix-#08),c
308b  dd7ef8    ld      a,(ix-#08)
308e  fe02      cp      #02
3090  2858      jr      z,#30ea         ; (88)
3092  dd7ef9    ld      a,(ix-#07)
3095  ddb6f8    or      (ix-#08)
3098  dd77f9    ld      (ix-#07),a
309b  2198f1    ld      hl,#f198
309e  7e        ld      a,(hl)
309f  23        inc     hl
30a0  b6        or      (hl)
30a1  23        inc     hl
30a2  b6        or      (hl)
30a3  23        inc     hl
30a4  b6        or      (hl)
30a5  28be      jr      z,#3065         ; (-66)
30a7  210431    ld      hl,#3104
30aa  e5        push    hl
30ab  216f31    ld      hl,#316f
30ae  cd84b1    call    #b184
30b1  dd71f8    ld      (ix-#08),c
30b4  dd7ef8    ld      a,(ix-#08)
30b7  fe02      cp      #02
30b9  282f      jr      z,#30ea         ; (47)
30bb  dd7ef9    ld      a,(ix-#07)
30be  ddb6f8    or      (ix-#08)
30c1  dd77f9    ld      (ix-#07),a
30c4  219cf1    ld      hl,#f19c
30c7  e5        push    hl
30c8  2198f4    ld      hl,#f498
30cb  e5        push    hl
30cc  df        rst     #18
30cd  f1        pop     af
30ce  97        sub     a
30cf  3298f1    ld      (#f198),a
30d2  3299f1    ld      (#f199),a
30d5  329af1    ld      (#f19a),a
30d8  329bf1    ld      (#f19b),a
30db  2e03      ld      l,#03
30dd  cd1d8b    call    #8b1d
30e0  dd71f8    ld      (ix-#08),c
30e3  dd7ef8    ld      a,(ix-#08)
30e6  fe02      cp      #02
30e8  2005      jr      nz,#30ef        ; (5)
30ea  0e02      ld      c,#02
30ec  c372be    jp      #be72
30ef  dd7ef9    ld      a,(ix-#07)
30f2  ddb6f8    or      (ix-#08)
30f5  dd77f9    ld      (ix-#07),a
30f8  c36530    jp      #3065
30fb  52        ld      d,d
30fc  41        ld      b,c
30fd  4d        ld      c,l
30fe  2044      jr      nz,#3144        ; (68)
3100  43        ld      b,e
3101  44        ld      b,h
3102  2000      jr      nz,#3104        ; (0)
3104  e7        rst     #20
3105  dd7e04    ld      a,(ix+#04)
3108  b7        or      a
3109  ca5031    jp      z,#3150
310c  2e71      ld      l,#71
310e  cf        rst     #8
310f  2e58      ld      l,#58
3111  cf        rst     #8
3112  21fb30    ld      hl,#30fb
3115  ef        rst     #28
3116  3e67      ld      a,#67
3118  329cf4    ld      (#f49c),a
311b  6f        ld      l,a
311c  d7        rst     #10
311d  2e63      ld      l,#63
311f  d7        rst     #10
3120  2e76      ld      l,#76
3122  d7        rst     #10
3123  2e04      ld      l,#04
3125  e5        push    hl
3126  2e10      ld      l,#10
3128  e5        push    hl
3129  219cf1    ld      hl,#f19c
312c  cdc57f    call    #7fc5
312f  2e63      ld      l,#63
3131  d7        rst     #10
3132  2e6a      ld      l,#6a
3134  d7        rst     #10
3135  3a9df4    ld      a,(#f49d)
3138  32c7f0    ld      (#f0c7),a
313b  2e01      ld      l,#01
313d  e5        push    hl
313e  2e0a      ld      l,#0a
3140  e5        push    hl
3141  21c5f0    ld      hl,#f0c5
3144  cdc57f    call    #7fc5
3147  2e7d      ld      l,#7d
3149  d7        rst     #10
314a  2e72      ld      l,#72
314c  cf        rst     #8
314d  cdd0b8    call    #b8d0
3150  dd7e04    ld      a,(ix+#04)
3153  b7        or      a
3154  2804      jr      z,#315a         ; (4)
3156  0e0a      ld      c,#0a
3158  1802      jr      #315c           ; (2)
315a  0e10      ld      c,#10
315c  69        ld      l,c
315d  cd7c76    call    #767c
3160  79        ld      a,c
3161  b7        or      a
3162  28ec      jr      z,#3150         ; (-20)
3164  2e7f      ld      l,#7f
3166  e5        push    hl
3167  2eff      ld      l,#ff
3169  cd657f    call    #7f65
316c  c384be    jp      #be84
316f  f7        rst     #30
3170  f5        push    af
3171  f5        push    af
3172  f5        push    af
3173  f5        push    af
3174  dd36f900  ld      (ix-#07),#00
3178  219cf1    ld      hl,#f19c
317b  e5        push    hl
317c  2198f4    ld      hl,#f498
317f  e5        push    hl
3180  df        rst     #18
3181  f1        pop     af
3182  97        sub     a
3183  3298f1    ld      (#f198),a
3186  3299f1    ld      (#f199),a
3189  329af1    ld      (#f19a),a
318c  329bf1    ld      (#f19b),a
318f  2e03      ld      l,#03
3191  cd1d8b    call    #8b1d
3194  dd71f8    ld      (ix-#08),c
3197  dd7ef8    ld      a,(ix-#08)
319a  fe02      cp      #02
319c  caed31    jp      z,#31ed
319f  dd7ef9    ld      a,(ix-#07)
31a2  ddb6f8    or      (ix-#08)
31a5  dd77f9    ld      (ix-#07),a
31a8  219cf1    ld      hl,#f19c
31ab  e5        push    hl
31ac  219ef4    ld      hl,#f49e
31af  e5        push    hl
31b0  df        rst     #18
31b1  f1        pop     af
31b2  2198f1    ld      hl,#f198
31b5  e5        push    hl
31b6  21d4f0    ld      hl,#f0d4
31b9  e5        push    hl
31ba  df        rst     #18
31bb  f1        pop     af
31bc  2e03      ld      l,#03
31be  cd1d8b    call    #8b1d
31c1  dd71f8    ld      (ix-#08),c
31c4  dd7ef8    ld      a,(ix-#08)
31c7  fe02      cp      #02
31c9  2822      jr      z,#31ed         ; (34)
31cb  dd7ef9    ld      a,(ix-#07)
31ce  ddb6f8    or      (ix-#08)
31d1  dd77f9    ld      (ix-#07),a
31d4  219cf1    ld      hl,#f19c
31d7  e5        push    hl
31d8  2198f4    ld      hl,#f498
31db  e5        push    hl
31dc  df        rst     #18
31dd  f1        pop     af
31de  2e05      ld      l,#05
31e0  cd1d8b    call    #8b1d
31e3  dd71f8    ld      (ix-#08),c
31e6  dd7ef8    ld      a,(ix-#08)
31e9  fe02      cp      #02
31eb  2005      jr      nz,#31f2        ; (5)
31ed  0e02      ld      c,#02
31ef  c372be    jp      #be72
31f2  dd7ef9    ld      a,(ix-#07)
31f5  ddb6f8    or      (ix-#08)
31f8  dd77f9    ld      (ix-#07),a
31fb  2198f1    ld      hl,#f198
31fe  7e        ld      a,(hl)
31ff  23        inc     hl
3200  b6        or      (hl)
3201  23        inc     hl
3202  b6        or      (hl)
3203  23        inc     hl
3204  b6        or      (hl)
3205  2820      jr      z,#3227         ; (32)
3207  dd7ef9    ld      a,(ix-#07)
320a  f601      or      #01
320c  dd77f9    ld      (ix-#07),a
320f  3a9cf4    ld      a,(#f49c)
3212  fe67      cp      #67
3214  2827      jr      z,#323d         ; (39)
3216  cdd0b8    call    #b8d0
3219  3e67      ld      a,#67
321b  329cf4    ld      (#f49c),a
321e  6f        ld      l,a
321f  e5        push    hl
3220  2e0a      ld      l,#0a
3222  cd657f    call    #7f65
3225  1816      jr      #323d           ; (22)
3227  3a9cf4    ld      a,(#f49c)
322a  fe6b      cp      #6b
322c  280f      jr      z,#323d         ; (15)
322e  cdd0b8    call    #b8d0
3231  3e6b      ld      a,#6b
3233  329cf4    ld      (#f49c),a
3236  6f        ld      l,a
3237  e5        push    hl
3238  2e0a      ld      l,#0a
323a  cd657f    call    #7f65
323d  dd4ef9    ld      c,(ix-#07)
3240  c372be    jp      #be72
3243  ff        rst     #38
3244  ff        rst     #38
3245  ff        rst     #38
3246  ff        rst     #38
3247  aa        xor     d
3248  aa        xor     d
3249  aa        xor     d
324a  aa        xor     d
324b  cccccc    call    z,#cccc
324e  ccf0f0    call    z,#f0f0
3251  f0        ret     p

3252  f0        ret     p

3253  00        nop     
3254  ff        rst     #38
3255  00        nop     
3256  ff        rst     #38
3257  ff        rst     #38
3258  ff        rst     #38
3259  00        nop     
325a  00        nop     
325b  00        nop     
325c  00        nop     
325d  00        nop     
325e  00        nop     
325f  f7        rst     #30
3260  f5        push    af
3261  f5        push    af
3262  f5        push    af
3263  f5        push    af
3264  dd36f900  ld      (ix-#07),#00
3268  97        sub     a
3269  32b2f4    ld      (#f4b2),a
326c  32b3f4    ld      (#f4b3),a
326f  3e01      ld      a,#01
3271  32bcf4    ld      (#f4bc),a
3274  21bff4    ld      hl,#f4bf
3277  e5        push    hl
3278  2121f1    ld      hl,#f121
327b  1135f9    ld      de,#f935
327e  ff        rst     #38
327f  2135f9    ld      hl,#f935
3282  e5        push    hl
3283  2139f1    ld      hl,#f139
3286  e5        push    hl
3287  cdf7bd    call    #bdf7
328a  df        rst     #18
328b  f1        pop     af
328c  21d9f0    ld      hl,#f0d9
328f  3e10      ld      a,#10
3291  be        cp      (hl)
3292  f29a32    jp      p,#329a
3295  0e06      ld      c,#06
3297  c3d032    jp      #32d0
329a  21d9f0    ld      hl,#f0d9
329d  3e08      ld      a,#08
329f  be        cp      (hl)
32a0  f2a732    jp      p,#32a7
32a3  0e05      ld      c,#05
32a5  1829      jr      #32d0           ; (41)
32a7  21d9f0    ld      hl,#f0d9
32aa  3e04      ld      a,#04
32ac  be        cp      (hl)
32ad  f2b432    jp      p,#32b4
32b0  0e04      ld      c,#04
32b2  181c      jr      #32d0           ; (28)
32b4  21d9f0    ld      hl,#f0d9
32b7  3e02      ld      a,#02
32b9  be        cp      (hl)
32ba  f2c132    jp      p,#32c1
32bd  0e03      ld      c,#03
32bf  180f      jr      #32d0           ; (15)
32c1  21d9f0    ld      hl,#f0d9
32c4  3e01      ld      a,#01
32c6  be        cp      (hl)
32c7  f2ce32    jp      p,#32ce
32ca  0e02      ld      c,#02
32cc  1802      jr      #32d0           ; (2)
32ce  0e01      ld      c,#01
32d0  79        ld      a,c
32d1  32bef4    ld      (#f4be),a
32d4  21b8f4    ld      hl,#f4b8
32d7  e5        push    hl
32d8  2139f1    ld      hl,#f139
32db  e5        push    hl
32dc  df        rst     #18
32dd  f1        pop     af
32de  2ab2f4    ld      hl,(#f4b2)
32e1  7c        ld      a,h
32e2  b5        or      l
32e3  281c      jr      z,#3301         ; (28)
32e5  219cf1    ld      hl,#f19c
32e8  e5        push    hl
32e9  21b8f4    ld      hl,#f4b8
32ec  e5        push    hl
32ed  df        rst     #18
32ee  f1        pop     af
32ef  2e05      ld      l,#05
32f1  cd1d8b    call    #8b1d
32f4  dd71f8    ld      (ix-#08),c
32f7  dd7ef8    ld      a,(ix-#08)
32fa  fe02      cp      #02
32fc  2022      jr      nz,#3320        ; (34)
32fe  c3d533    jp      #33d5
3301  219cf1    ld      hl,#f19c
3304  e5        push    hl
3305  21b8f4    ld      hl,#f4b8
3308  e5        push    hl
3309  df        rst     #18
330a  f1        pop     af
330b  cd5134    call    #3451
330e  2e03      ld      l,#03
3310  cd1d8b    call    #8b1d
3313  dd71f8    ld      (ix-#08),c
3316  dd7ef8    ld      a,(ix-#08)
3319  fe02      cp      #02
331b  2042      jr      nz,#335f        ; (66)
331d  c3d533    jp      #33d5
3320  dd7ef9    ld      a,(ix-#07)
3323  ddb6f8    or      (ix-#08)
3326  dd77f9    ld      (ix-#07),a
3329  cdad34    call    #34ad
332c  21aaf4    ld      hl,#f4aa
332f  e5        push    hl
3330  2198f1    ld      hl,#f198
3333  e5        push    hl
3334  df        rst     #18
3335  21aef4    ld      hl,#f4ae
3338  e5        push    hl
3339  cdd9ba    call    #bad9
333c  28c3      jr      z,#3301         ; (-61)
333e  215d35    ld      hl,#355d
3341  e5        push    hl
3342  217936    ld      hl,#3679
3345  cd84b1    call    #b184
3348  dd71f8    ld      (ix-#08),c
334b  dd7ef8    ld      a,(ix-#08)
334e  fe02      cp      #02
3350  cad533    jp      z,#33d5
3353  dd7ef9    ld      a,(ix-#07)
3356  ddb6f8    or      (ix-#08)
3359  dd77f9    ld      (ix-#07),a
335c  c30133    jp      #3301
335f  dd7ef9    ld      a,(ix-#07)
3362  ddb6f8    or      (ix-#08)
3365  dd77f9    ld      (ix-#07),a
3368  21b8f4    ld      hl,#f4b8
336b  e5        push    hl
336c  2121f1    ld      hl,#f121
336f  e5        push    hl
3370  cdd9ba    call    #bad9
3373  2031      jr      nz,#33a6        ; (49)
3375  3abef4    ld      a,(#f4be)
3378  5f        ld      e,a
3379  87        add     a,a
337a  9f        sbc     a,a
337b  57        ld      d,a
337c  21b2f4    ld      hl,#f4b2
337f  7b        ld      a,e
3380  be        cp      (hl)
3381  2003      jr      nz,#3386        ; (3)
3383  7a        ld      a,d
3384  23        inc     hl
3385  be        cp      (hl)
3386  2052      jr      nz,#33da        ; (82)
3388  210600    ld      hl,#0006
338b  97        sub     a
338c  32bcf4    ld      (#f4bc),a
338f  22b2f4    ld      (#f4b2),hl
3392  3ab6f0    ld      a,(#f0b6)
3395  32a8f4    ld      (#f4a8),a
3398  87        add     a,a
3399  9f        sbc     a,a
339a  32a9f4    ld      (#f4a9),a
339d  32a7f4    ld      (#f4a7),a
33a0  32a6f4    ld      (#f4a6),a
33a3  c34334    jp      #3443
33a6  21b8f4    ld      hl,#f4b8
33a9  e5        push    hl
33aa  3ab6f0    ld      a,(#f0b6)
33ad  3237f9    ld      (#f937),a
33b0  87        add     a,a
33b1  9f        sbc     a,a
33b2  3238f9    ld      (#f938),a
33b5  3236f9    ld      (#f936),a
33b8  3235f9    ld      (#f935),a
33bb  2135f9    ld      hl,#f935
33be  e5        push    hl
33bf  cd62ba    call    #ba62
33c2  f1        pop     af
33c3  3a9ef1    ld      a,(#f19e)
33c6  b7        or      a
33c7  c2de32    jp      nz,#32de
33ca  2e01      ld      l,#01
33cc  cdceb2    call    #b2ce
33cf  79        ld      a,c
33d0  fe02      cp      #02
33d2  c2de32    jp      nz,#32de
33d5  0e02      ld      c,#02
33d7  c372be    jp      #be72
33da  3abcf4    ld      a,(#f4bc)
33dd  fe01      cp      #01
33df  200a      jr      nz,#33eb        ; (10)
33e1  2ab2f4    ld      hl,(#f4b2)
33e4  23        inc     hl
33e5  22b2f4    ld      (#f4b2),hl
33e8  c34334    jp      #3443
33eb  21a6f4    ld      hl,#f4a6
33ee  1135f9    ld      de,#f935
33f1  ff        rst     #38
33f2  2135f9    ld      hl,#f935
33f5  e5        push    hl
33f6  3ab6f0    ld      a,(#f0b6)
33f9  323ff9    ld      (#f93f),a
33fc  87        add     a,a
33fd  9f        sbc     a,a
33fe  3240f9    ld      (#f940),a
3401  323ef9    ld      (#f93e),a
3404  323df9    ld      (#f93d),a
3407  213df9    ld      hl,#f93d
340a  e5        push    hl
340b  cdf7bd    call    #bdf7
340e  21bff4    ld      hl,#f4bf
3411  e5        push    hl
3412  cdb0ba    call    #bab0
3415  3806      jr      c,#341d         ; (6)
3417  dd4ef9    ld      c,(ix-#07)
341a  c372be    jp      #be72
341d  21b4f4    ld      hl,#f4b4
3420  e5        push    hl
3421  21a6f4    ld      hl,#f4a6
3424  e5        push    hl
3425  df        rst     #18
3426  f1        pop     af
3427  21a6f4    ld      hl,#f4a6
342a  e5        push    hl
342b  3e02      ld      a,#02
342d  3237f9    ld      (#f937),a
3430  87        add     a,a
3431  9f        sbc     a,a
3432  3238f9    ld      (#f938),a
3435  3236f9    ld      (#f936),a
3438  3235f9    ld      (#f935),a
343b  2135f9    ld      hl,#f935
343e  e5        push    hl
343f  cd3ebd    call    #bd3e
3442  f1        pop     af
3443  2e01      ld      l,#01
3445  cdceb2    call    #b2ce
3448  79        ld      a,c
3449  fe02      cp      #02
344b  c2d432    jp      nz,#32d4
344e  c3d533    jp      #33d5
3451  f7        rst     #30
3452  2198f1    ld      hl,#f198
3455  e5        push    hl
3456  3ab2f4    ld      a,(#f4b2)
3459  d606      sub     #06
345b  3ab3f4    ld      a,(#f4b3)
345e  de00      sbc     a,#00
3460  f26934    jp      p,#3469
3463  ed4bb2f4  ld      bc,(#f4b2)
3467  1829      jr      #3492           ; (41)
3469  219cf1    ld      hl,#f19c
346c  1135f9    ld      de,#f935
346f  ff        rst     #38
3470  2135f9    ld      hl,#f935
3473  e5        push    hl
3474  21a6f4    ld      hl,#f4a6
3477  e5        push    hl
3478  cd8dba    call    #ba8d
347b  e1        pop     hl
347c  7e        ld      a,(hl)
347d  23        inc     hl
347e  b6        or      (hl)
347f  23        inc     hl
3480  b6        or      (hl)
3481  23        inc     hl
3482  b6        or      (hl)
3483  2804      jr      z,#3489         ; (4)
3485  0e06      ld      c,#06
3487  1802      jr      #348b           ; (2)
3489  0e00      ld      c,#00
348b  79        ld      a,c
348c  5f        ld      e,a
348d  87        add     a,a
348e  9f        sbc     a,a
348f  57        ld      d,a
3490  4b        ld      c,e
3491  42        ld      b,d
3492  69        ld      l,c
3493  60        ld      h,b
3494  29        add     hl,hl
3495  29        add     hl,hl
3496  014332    ld      bc,#3243
3499  09        add     hl,bc
349a  1135f9    ld      de,#f935
349d  ff        rst     #38
349e  2135f9    ld      hl,#f935
34a1  e5        push    hl
34a2  21d4f0    ld      hl,#f0d4
34a5  e5        push    hl
34a6  cd8dba    call    #ba8d
34a9  df        rst     #18
34aa  c372be    jp      #be72
34ad  f7        rst     #30
34ae  21aef4    ld      hl,#f4ae
34b1  e5        push    hl
34b2  3ab2f4    ld      a,(#f4b2)
34b5  d606      sub     #06
34b7  3ab3f4    ld      a,(#f4b3)
34ba  de00      sbc     a,#00
34bc  f2cc34    jp      p,#34cc
34bf  ed4bb2f4  ld      bc,(#f4b2)
34c3  21ffff    ld      hl,#ffff
34c6  09        add     hl,bc
34c7  4d        ld      c,l
34c8  44        ld      b,h
34c9  c31935    jp      #3519
34cc  21a6f4    ld      hl,#f4a6
34cf  e5        push    hl
34d0  3ab6f0    ld      a,(#f0b6)
34d3  3237f9    ld      (#f937),a
34d6  87        add     a,a
34d7  9f        sbc     a,a
34d8  3238f9    ld      (#f938),a
34db  3236f9    ld      (#f936),a
34de  3235f9    ld      (#f935),a
34e1  2135f9    ld      hl,#f935
34e4  e5        push    hl
34e5  cdd9ba    call    #bad9
34e8  2006      jr      nz,#34f0        ; (6)
34ea  3abef4    ld      a,(#f4be)
34ed  4f        ld      c,a
34ee  1822      jr      #3512           ; (34)
34f0  219cf1    ld      hl,#f19c
34f3  1135f9    ld      de,#f935
34f6  ff        rst     #38
34f7  2135f9    ld      hl,#f935
34fa  e5        push    hl
34fb  21b4f4    ld      hl,#f4b4
34fe  e5        push    hl
34ff  cd8dba    call    #ba8d
3502  e1        pop     hl
3503  7e        ld      a,(hl)
3504  23        inc     hl
3505  b6        or      (hl)
3506  23        inc     hl
3507  b6        or      (hl)
3508  23        inc     hl
3509  b6        or      (hl)
350a  2804      jr      z,#3510         ; (4)
350c  0e06      ld      c,#06
350e  1802      jr      #3512           ; (2)
3510  0e00      ld      c,#00
3512  79        ld      a,c
3513  5f        ld      e,a
3514  87        add     a,a
3515  9f        sbc     a,a
3516  57        ld      d,a
3517  4b        ld      c,e
3518  42        ld      b,d
3519  69        ld      l,c
351a  60        ld      h,b
351b  29        add     hl,hl
351c  29        add     hl,hl
351d  014332    ld      bc,#3243
3520  09        add     hl,bc
3521  1135f9    ld      de,#f935
3524  ff        rst     #38
3525  2135f9    ld      hl,#f935
3528  e5        push    hl
3529  21d4f0    ld      hl,#f0d4
352c  e5        push    hl
352d  cd8dba    call    #ba8d
3530  df        rst     #18
3531  c372be    jp      #be72
3534  011bf4    ld      bc,#f41b
3537  35        dec     (hl)
3538  e5        push    hl
3539  35        dec     (hl)
353a  02        ld      (bc),a
353b  00        nop     
353c  010736    ld      bc,#3607
353f  0a        ld      a,(bc)
3540  367f      ld      (hl),#7f
3542  35        dec     (hl)
3543  204e      jr      nz,#3593        ; (78)
3545  4f        ld      c,a
3546  54        ld      d,h
3547  2000      jr      nz,#3549        ; (0)
3549  44        ld      b,h
354a  41        ld      b,c
354b  54        ld      d,h
354c  41        ld      b,c
354d  2057      jr      nz,#35a6        ; (87)
354f  41        ld      b,c
3550  53        ld      d,e
3551  2000      jr      nz,#3553        ; (0)
3553  52        ld      d,d
3554  41        ld      b,c
3555  4d        ld      c,l
3556  2050      jr      nz,#35a8        ; (80)
3558  41        ld      b,c
3559  54        ld      d,h
355a  54        ld      d,h
355b  2000      jr      nz,#355d        ; (0)
355d  e7        rst     #20
355e  21f9ff    ld      hl,#fff9
3561  39        add     hl,sp
3562  f9        ld      sp,hl
3563  dd36f900  ld      (ix-#07),#00
3567  dd7e04    ld      a,(ix+#04)
356a  b7        or      a
356b  2803      jr      z,#3570         ; (3)
356d  cdd0b8    call    #b8d0
3570  2e71      ld      l,#71
3572  cf        rst     #8
3573  2e58      ld      l,#58
3575  cf        rst     #8
3576  dd4ef9    ld      c,(ix-#07)
3579  213a35    ld      hl,#353a
357c  c3edb8    jp      #b8ed
357f  215335    ld      hl,#3553
3582  ef        rst     #28
3583  dd7e04    ld      a,(ix+#04)
3586  b7        or      a
3587  2808      jr      z,#3591         ; (8)
3589  3e67      ld      a,#67
358b  32bdf4    ld      (#f4bd),a
358e  4f        ld      c,a
358f  1804      jr      #3595           ; (4)
3591  3abdf4    ld      a,(#f4bd)
3594  4f        ld      c,a
3595  69        ld      l,c
3596  d7        rst     #10
3597  2e63      ld      l,#63
3599  d7        rst     #10
359a  2e76      ld      l,#76
359c  d7        rst     #10
359d  2e60      ld      l,#60
359f  d7        rst     #10
35a0  2e04      ld      l,#04
35a2  e5        push    hl
35a3  2e10      ld      l,#10
35a5  e5        push    hl
35a6  21b8f4    ld      hl,#f4b8
35a9  cdc57f    call    #7fc5
35ac  dd7e04    ld      a,(ix+#04)
35af  b7        or      a
35b0  2804      jr      z,#35b6         ; (4)
35b2  0e7d      ld      c,#7d
35b4  1802      jr      #35b8           ; (2)
35b6  0e7f      ld      c,#7f
35b8  69        ld      l,c
35b9  d7        rst     #10
35ba  2e72      ld      l,#72
35bc  cf        rst     #8
35bd  2e10      ld      l,#10
35bf  cd1fb1    call    #b11f
35c2  dd7e04    ld      a,(ix+#04)
35c5  b7        or      a
35c6  2804      jr      z,#35cc         ; (4)
35c8  0e12      ld      c,#12
35ca  1802      jr      #35ce           ; (2)
35cc  0e13      ld      c,#13
35ce  69        ld      l,c
35cf  cd7c76    call    #767c
35d2  79        ld      a,c
35d3  b7        or      a
35d4  28ec      jr      z,#35c2         ; (-20)
35d6  2e10      ld      l,#10
35d8  cd36b1    call    #b136
35db  3a26f1    ld      a,(#f126)
35de  4f        ld      c,a
35df  213435    ld      hl,#3534
35e2  c3edb8    jp      #b8ed
35e5  dd36f901  ld      (ix-#07),#01
35e9  3e7f      ld      a,#7f
35eb  3226f1    ld      (#f126),a
35ee  c37035    jp      #3570
35f1  c37035    jp      #3570
35f4  2e10      ld      l,#10
35f6  cd36b1    call    #b136
35f9  2e7f      ld      l,#7f
35fb  e5        push    hl
35fc  2eff      ld      l,#ff
35fe  cd657f    call    #7f65
3601  010200    ld      bc,#0002
3604  c384be    jp      #be84
3607  c37035    jp      #3570
360a  214935    ld      hl,#3549
360d  ef        rst     #28
360e  2e60      ld      l,#60
3610  d7        rst     #10
3611  3ad8f0    ld      a,(#f0d8)
3614  87        add     a,a
3615  6f        ld      l,a
3616  e5        push    hl
3617  2e10      ld      l,#10
3619  e5        push    hl
361a  21aaf4    ld      hl,#f4aa
361d  cdc57f    call    #7fc5
3620  cdad34    call    #34ad
3623  21aef4    ld      hl,#f4ae
3626  e5        push    hl
3627  21aaf4    ld      hl,#f4aa
362a  e5        push    hl
362b  cdd9ba    call    #bad9
362e  2816      jr      z,#3646         ; (22)
3630  214335    ld      hl,#3543
3633  ef        rst     #28
3634  2e60      ld      l,#60
3636  d7        rst     #10
3637  3ad8f0    ld      a,(#f0d8)
363a  87        add     a,a
363b  6f        ld      l,a
363c  e5        push    hl
363d  2e10      ld      l,#10
363f  e5        push    hl
3640  21aef4    ld      hl,#f4ae
3643  cdc57f    call    #7fc5
3646  dd7e04    ld      a,(ix+#04)
3649  b7        or      a
364a  2803      jr      z,#364f         ; (3)
364c  2e7d      ld      l,#7d
364e  d7        rst     #10
364f  2e72      ld      l,#72
3651  cf        rst     #8
3652  dd7e04    ld      a,(ix+#04)
3655  b7        or      a
3656  2804      jr      z,#365c         ; (4)
3658  0e14      ld      c,#14
365a  1802      jr      #365e           ; (2)
365c  0e15      ld      c,#15
365e  69        ld      l,c
365f  cd7c76    call    #767c
3662  79        ld      a,c
3663  b7        or      a
3664  28ec      jr      z,#3652         ; (-20)
3666  3a26f1    ld      a,(#f126)
3669  fe1a      cp      #1a
366b  2005      jr      nz,#3672        ; (5)
366d  3e7f      ld      a,#7f
366f  3226f1    ld      (#f126),a
3672  dd36f900  ld      (ix-#07),#00
3676  c37035    jp      #3570
3679  f7        rst     #30
367a  f5        push    af
367b  f5        push    af
367c  f5        push    af
367d  f5        push    af
367e  dd36f900  ld      (ix-#07),#00
3682  21c3f4    ld      hl,#f4c3
3685  e5        push    hl
3686  21b8f4    ld      hl,#f4b8
3689  e5        push    hl
368a  df        rst     #18
368b  f1        pop     af
368c  219cf1    ld      hl,#f19c
368f  e5        push    hl
3690  21c3f4    ld      hl,#f4c3
3693  e5        push    hl
3694  df        rst     #18
3695  f1        pop     af
3696  cdad34    call    #34ad
3699  2198f1    ld      hl,#f198
369c  e5        push    hl
369d  21aef4    ld      hl,#f4ae
36a0  e5        push    hl
36a1  df        rst     #18
36a2  f1        pop     af
36a3  2e03      ld      l,#03
36a5  cd1d8b    call    #8b1d
36a8  dd71f8    ld      (ix-#08),c
36ab  dd7ef8    ld      a,(ix-#08)
36ae  fe02      cp      #02
36b0  ca2f37    jp      z,#372f
36b3  dd7ef9    ld      a,(ix-#07)
36b6  ddb6f8    or      (ix-#08)
36b9  dd77f9    ld      (ix-#07),a
36bc  21c3f4    ld      hl,#f4c3
36bf  e5        push    hl
36c0  2121f1    ld      hl,#f121
36c3  e5        push    hl
36c4  cdd9ba    call    #bad9
36c7  2037      jr      nz,#3700        ; (55)
36c9  21c3f4    ld      hl,#f4c3
36cc  e5        push    hl
36cd  2139f1    ld      hl,#f139
36d0  e5        push    hl
36d1  df        rst     #18
36d2  f1        pop     af
36d3  21c3f4    ld      hl,#f4c3
36d6  e5        push    hl
36d7  21b8f4    ld      hl,#f4b8
36da  e5        push    hl
36db  cdb0ba    call    #bab0
36de  d23437    jp      nc,#3734
36e1  219cf1    ld      hl,#f19c
36e4  e5        push    hl
36e5  21c3f4    ld      hl,#f4c3
36e8  e5        push    hl
36e9  df        rst     #18
36ea  f1        pop     af
36eb  cd5134    call    #3451
36ee  2e03      ld      l,#03
36f0  cd1d8b    call    #8b1d
36f3  dd71f8    ld      (ix-#08),c
36f6  dd7ef8    ld      a,(ix-#08)
36f9  fe02      cp      #02
36fb  c27237    jp      nz,#3772
36fe  182f      jr      #372f           ; (47)
3700  21c3f4    ld      hl,#f4c3
3703  e5        push    hl
3704  3ab6f0    ld      a,(#f0b6)
3707  3237f9    ld      (#f937),a
370a  87        add     a,a
370b  9f        sbc     a,a
370c  3238f9    ld      (#f938),a
370f  3236f9    ld      (#f936),a
3712  3235f9    ld      (#f935),a
3715  2135f9    ld      hl,#f935
3718  e5        push    hl
3719  cd62ba    call    #ba62
371c  f1        pop     af
371d  3a9ef1    ld      a,(#f19e)
3720  b7        or      a
3721  c28c36    jp      nz,#368c
3724  2e01      ld      l,#01
3726  cdceb2    call    #b2ce
3729  79        ld      a,c
372a  fe02      cp      #02
372c  c28c36    jp      nz,#368c
372f  0e02      ld      c,#02
3731  c372be    jp      #be72
3734  219cf1    ld      hl,#f19c
3737  e5        push    hl
3738  21b8f4    ld      hl,#f4b8
373b  e5        push    hl
373c  df        rst     #18
373d  f1        pop     af
373e  cdad34    call    #34ad
3741  2e05      ld      l,#05
3743  cd1d8b    call    #8b1d
3746  dd71f8    ld      (ix-#08),c
3749  dd7ef8    ld      a,(ix-#08)
374c  fe02      cp      #02
374e  203e      jr      nz,#378e        ; (62)
3750  18dd      jr      #372f           ; (-35)
3752  21c3f4    ld      hl,#f4c3
3755  e5        push    hl
3756  3ab6f0    ld      a,(#f0b6)
3759  3237f9    ld      (#f937),a
375c  87        add     a,a
375d  9f        sbc     a,a
375e  3238f9    ld      (#f938),a
3761  3236f9    ld      (#f936),a
3764  3235f9    ld      (#f935),a
3767  2135f9    ld      hl,#f935
376a  e5        push    hl
376b  cd62ba    call    #ba62
376e  f1        pop     af
376f  c3d336    jp      #36d3
3772  dd7ef9    ld      a,(ix-#07)
3775  ddb6f8    or      (ix-#08)
3778  dd77f9    ld      (ix-#07),a
377b  3a9ef1    ld      a,(#f19e)
377e  b7        or      a
377f  20d1      jr      nz,#3752        ; (-47)
3781  2e01      ld      l,#01
3783  cdceb2    call    #b2ce
3786  79        ld      a,c
3787  fe02      cp      #02
3789  20c7      jr      nz,#3752        ; (-57)
378b  c32f37    jp      #372f
378e  dd7ef9    ld      a,(ix-#07)
3791  ddb6f8    or      (ix-#08)
3794  dd77f9    ld      (ix-#07),a
3797  21aaf4    ld      hl,#f4aa
379a  e5        push    hl
379b  2198f1    ld      hl,#f198
379e  e5        push    hl
379f  df        rst     #18
37a0  21aef4    ld      hl,#f4ae
37a3  e5        push    hl
37a4  cdd9ba    call    #bad9
37a7  2018      jr      nz,#37c1        ; (24)
37a9  3abdf4    ld      a,(#f4bd)
37ac  fe6b      cp      #6b
37ae  282f      jr      z,#37df         ; (47)
37b0  cdd0b8    call    #b8d0
37b3  3e6b      ld      a,#6b
37b5  32bdf4    ld      (#f4bd),a
37b8  6f        ld      l,a
37b9  e5        push    hl
37ba  2e0b      ld      l,#0b
37bc  cd657f    call    #7f65
37bf  181e      jr      #37df           ; (30)
37c1  dd7ef9    ld      a,(ix-#07)
37c4  f601      or      #01
37c6  dd77f9    ld      (ix-#07),a
37c9  3abdf4    ld      a,(#f4bd)
37cc  fe67      cp      #67
37ce  280f      jr      z,#37df         ; (15)
37d0  cdd0b8    call    #b8d0
37d3  3e67      ld      a,#67
37d5  32bdf4    ld      (#f4bd),a
37d8  6f        ld      l,a
37d9  e5        push    hl
37da  2e0b      ld      l,#0b
37dc  cd657f    call    #7f65
37df  dd4ef9    ld      c,(ix-#07)
37e2  c372be    jp      #be72
37e5  f7        rst     #30
37e6  2e58      ld      l,#58
37e8  cf        rst     #8
37e9  2e44      ld      l,#44
37eb  d7        rst     #10
37ec  2e5b      ld      l,#5b
37ee  cf        rst     #8
37ef  2e11      ld      l,#11
37f1  cd9573    call    #7395
37f4  79        ld      a,c
37f5  b7        or      a
37f6  203b      jr      nz,#3833        ; (59)
37f8  3a27f1    ld      a,(#f127)
37fb  6f        ld      l,a
37fc  d7        rst     #10
37fd  2e63      ld      l,#63
37ff  d7        rst     #10
3800  2e62      ld      l,#62
3802  d7        rst     #10
3803  213d04    ld      hl,#043d
3806  e5        push    hl
3807  214104    ld      hl,#0441
380a  e5        push    hl
380b  2e00      ld      l,#00
380d  e5        push    hl
380e  2e10      ld      l,#10
3810  e5        push    hl
3811  3a27f1    ld      a,(#f127)
3814  4f        ld      c,a
3815  87        add     a,a
3816  9f        sbc     a,a
3817  47        ld      b,a
3818  69        ld      l,c
3819  60        ld      h,b
381a  29        add     hl,hl
381b  29        add     hl,hl
381c  0160f1    ld      bc,#f160
381f  09        add     hl,bc
3820  cd4c78    call    #784c
3823  79        ld      a,c
3824  b7        or      a
3825  280f      jr      z,#3836         ; (15)
3827  3a40f1    ld      a,(#f140)
382a  fe02      cp      #02
382c  2008      jr      nz,#3836        ; (8)
382e  cd229a    call    #9a22
3831  1803      jr      #3836           ; (3)
3833  cde6b8    call    #b8e6
3836  c372be    jp      #be72
3839  05        dec     b
383a  34        inc     (hl)
383b  35        dec     (hl)
383c  3632      ld      (hl),#32
383e  33        inc     sp
383f  cc3836    call    z,#3638
3842  39        add     hl,sp
3843  27        daa     
3844  39        add     hl,sp
3845  13        inc     de
3846  39        add     hl,sp
3847  f1        pop     af
3848  38ac      jr      c,#37f6         ; (-84)
384a  38f7      jr      c,#3843         ; (-9)
384c  21f9ff    ld      hl,#fff9
384f  39        add     hl,sp
3850  f9        ld      sp,hl
3851  3a27f1    ld      a,(#f127)
3854  dd77f9    ld      (ix-#07),a
3857  2e58      ld      l,#58
3859  cf        rst     #8
385a  dd6ef9    ld      l,(ix-#07)
385d  d7        rst     #10
385e  2e7c      ld      l,#7c
3860  d7        rst     #10
3861  2e5b      ld      l,#5b
3863  cf        rst     #8
3864  2e11      ld      l,#11
3866  cd9573    call    #7395
3869  79        ld      a,c
386a  b7        or      a
386b  2017      jr      nz,#3884        ; (23)
386d  2e5c      ld      l,#5c
386f  cf        rst     #8
3870  3a27f1    ld      a,(#f127)
3873  6f        ld      l,a
3874  d7        rst     #10
3875  2e63      ld      l,#63
3877  d7        rst     #10
3878  3a40f1    ld      a,(#f140)
387b  fe02      cp      #02
387d  200b      jr      nz,#388a        ; (11)
387f  cd229a    call    #9a22
3882  1803      jr      #3887           ; (3)
3884  cde6b8    call    #b8e6
3887  c372be    jp      #be72
388a  2e62      ld      l,#62
388c  d7        rst     #10
388d  213bf3    ld      hl,#f33b
3890  e5        push    hl
3891  3a27f1    ld      a,(#f127)
3894  4f        ld      c,a
3895  87        add     a,a
3896  9f        sbc     a,a
3897  47        ld      b,a
3898  69        ld      l,c
3899  60        ld      h,b
389a  29        add     hl,hl
389b  29        add     hl,hl
389c  0160f1    ld      bc,#f160
389f  09        add     hl,bc
38a0  e5        push    hl
38a1  df        rst     #18
38a2  f1        pop     af
38a3  dd4ef9    ld      c,(ix-#07)
38a6  213938    ld      hl,#3839
38a9  c3edb8    jp      #b8ed
38ac  213bf3    ld      hl,#f33b
38af  e5        push    hl
38b0  3e00      ld      a,#00
38b2  87        add     a,a
38b3  9f        sbc     a,a
38b4  3235f9    ld      (#f935),a
38b7  3236f9    ld      (#f936),a
38ba  3e00      ld      a,#00
38bc  3238f9    ld      (#f938),a
38bf  3e01      ld      a,#01
38c1  3237f9    ld      (#f937),a
38c4  2135f9    ld      hl,#f935
38c7  e5        push    hl
38c8  cd62ba    call    #ba62
38cb  f1        pop     af
38cc  3a27f1    ld      a,(#f127)
38cf  4f        ld      c,a
38d0  87        add     a,a
38d1  9f        sbc     a,a
38d2  47        ld      b,a
38d3  69        ld      l,c
38d4  60        ld      h,b
38d5  29        add     hl,hl
38d6  29        add     hl,hl
38d7  0160f1    ld      bc,#f160
38da  09        add     hl,bc
38db  e5        push    hl
38dc  213bf3    ld      hl,#f33b
38df  e5        push    hl
38e0  df        rst     #18
38e1  f1        pop     af
38e2  2e01      ld      l,#01
38e4  e5        push    hl
38e5  2e10      ld      l,#10
38e7  e5        push    hl
38e8  213bf3    ld      hl,#f33b
38eb  cdc57f    call    #7fc5
38ee  c38738    jp      #3887
38f1  213bf3    ld      hl,#f33b
38f4  e5        push    hl
38f5  3e00      ld      a,#00
38f7  87        add     a,a
38f8  9f        sbc     a,a
38f9  3235f9    ld      (#f935),a
38fc  3236f9    ld      (#f936),a
38ff  3e00      ld      a,#00
3901  3238f9    ld      (#f938),a
3904  3e01      ld      a,#01
3906  3237f9    ld      (#f937),a
3909  2135f9    ld      hl,#f935
390c  e5        push    hl
390d  cdf7bd    call    #bdf7
3910  f1        pop     af
3911  18b9      jr      #38cc           ; (-71)
3913  213bf3    ld      hl,#f33b
3916  e5        push    hl
3917  1135f9    ld      de,#f935
391a  ff        rst     #38
391b  2135f9    ld      hl,#f935
391e  e5        push    hl
391f  cd03bb    call    #bb03
3922  df        rst     #18
3923  f1        pop     af
3924  c3cc38    jp      #38cc
3927  213bf3    ld      hl,#f33b
392a  e5        push    hl
392b  210100    ld      hl,#0001
392e  e5        push    hl
392f  cdb2bc    call    #bcb2
3932  f1        pop     af
3933  c3cc38    jp      #38cc
3936  213bf3    ld      hl,#f33b
3939  e5        push    hl
393a  210100    ld      hl,#0001
393d  e5        push    hl
393e  cd0fbd    call    #bd0f
3941  f1        pop     af
3942  c3cc38    jp      #38cc
3945  00        nop     
3946  00        nop     
3947  00        nop     
3948  00        nop     
3949  00        nop     
394a  00        nop     
394b  00        nop     
394c  010204    ld      bc,#0402
394f  08        ex      af,af'
3950  1020      djnz    #3972           ; (32)
3952  40        ld      b,b
3953  80        add     a,b
3954  00        nop     
3955  00        nop     
3956  00        nop     
3957  00        nop     
3958  00        nop     
3959  00        nop     
395a  00        nop     
395b  00        nop     
395c  00        nop     
395d  00        nop     
395e  010203    ld      bc,#0302
3961  04        inc     b
3962  05        dec     b
3963  0600      ld      b,#00
3965  010203    ld      bc,#0302
3968  04        inc     b
3969  05        dec     b
396a  0607      ld      b,#07
396c  00        nop     
396d  010207    ld      bc,#0702
3970  08        ex      af,af'
3971  03        inc     bc
3972  04        inc     b
3973  05        dec     b
3974  0600      ld      b,#00
3976  00        nop     
3977  00        nop     
3978  00        nop     
3979  00        nop     
397a  00        nop     
397b  00        nop     
397c  00        nop     
397d  00        nop     
397e  00        nop     
397f  00        nop     
3980  00        nop     
3981  00        nop     
3982  00        nop     
3983  00        nop     
3984  010101    ld      bc,#0101
3987  00        nop     
3988  00        nop     
3989  010101    ld      bc,#0101
398c  015345    ld      bc,#4553
398f  54        ld      d,h
3990  2d        dec     l
3991  00        nop     
3992  f7        rst     #30
3993  21f7ff    ld      hl,#fff7
3996  39        add     hl,sp
3997  f9        ld      sp,hl
3998  3ae7f2    ld      a,(#f2e7)
399b  dd77f8    ld      (ix-#08),a
399e  2e58      ld      l,#58
39a0  cf        rst     #8
39a1  218d39    ld      hl,#398d
39a4  ef        rst     #28
39a5  214539    ld      hl,#3945
39a8  dd5ef8    ld      e,(ix-#08)
39ab  97        sub     a
39ac  57        ld      d,a
39ad  19        add     hl,de
39ae  7e        ld      a,(hl)
39af  dd77f9    ld      (ix-#07),a
39b2  dd6ef9    ld      l,(ix-#07)
39b5  3adaf0    ld      a,(#f0da)
39b8  2f        cpl     
39b9  4f        ld      c,a
39ba  a5        and     l
39bb  2805      jr      z,#39c2         ; (5)
39bd  cde6b8    call    #b8e6
39c0  182c      jr      #39ee           ; (44)
39c2  215d39    ld      hl,#395d
39c5  dd5ef8    ld      e,(ix-#08)
39c8  97        sub     a
39c9  57        ld      d,a
39ca  19        add     hl,de
39cb  7e        ld      a,(hl)
39cc  dd77f7    ld      (ix-#09),a
39cf  217539    ld      hl,#3975
39d2  dd5ef8    ld      e,(ix-#08)
39d5  97        sub     a
39d6  57        ld      d,a
39d7  19        add     hl,de
39d8  7e        ld      a,(hl)
39d9  b7        or      a
39da  200c      jr      nz,#39e8        ; (12)
39dc  dd6ef9    ld      l,(ix-#07)
39df  e5        push    hl
39e0  dd6ef7    ld      l,(ix-#09)
39e3  cd213b    call    #3b21
39e6  1806      jr      #39ee           ; (6)
39e8  dd6ef7    ld      l,(ix-#09)
39eb  cd793c    call    #3c79
39ee  2e16      ld      l,#16
39f0  cd9573    call    #7395
39f3  79        ld      a,c
39f4  fe01      cp      #01
39f6  2018      jr      nz,#3a10        ; (24)
39f8  3a27f1    ld      a,(#f127)
39fb  fe3d      cp      #3d
39fd  2004      jr      nz,#3a03        ; (4)
39ff  0e00      ld      c,#00
3a01  1803      jr      #3a06           ; (3)
3a03  dd4ef8    ld      c,(ix-#08)
3a06  79        ld      a,c
3a07  32e7f2    ld      (#f2e7),a
3a0a  cde6b8    call    #b8e6
3a0d  c372be    jp      #be72
3a10  3a27f1    ld      a,(#f127)
3a13  fe1b      cp      #1b
3a15  2015      jr      nz,#3a2c        ; (21)
3a17  dd7ef8    ld      a,(ix-#08)
3a1a  fe17      cp      #17
3a1c  2004      jr      nz,#3a22        ; (4)
3a1e  0e00      ld      c,#00
3a20  1804      jr      #3a26           ; (4)
3a22  dd4ef8    ld      c,(ix-#08)
3a25  0c        inc     c
3a26  dd71f8    ld      (ix-#08),c
3a29  c39e39    jp      #399e
3a2c  dd7ef8    ld      a,(ix-#08)
3a2f  b7        or      a
3a30  2809      jr      z,#3a3b         ; (9)
3a32  dd4ef8    ld      c,(ix-#08)
3a35  79        ld      a,c
3a36  c6ff      add     a,#ff
3a38  4f        ld      c,a
3a39  1802      jr      #3a3d           ; (2)
3a3b  0e17      ld      c,#17
3a3d  dd71f8    ld      (ix-#08),c
3a40  c39e39    jp      #399e
3a43  14        inc     d
3a44  f1        pop     af
3a45  14        inc     d
3a46  f1        pop     af
3a47  14        inc     d
3a48  f1        pop     af
3a49  14        inc     d
3a4a  f1        pop     af
3a4b  14        inc     d
3a4c  f1        pop     af
3a4d  14        inc     d
3a4e  f1        pop     af
3a4f  14        inc     d
3a50  f1        pop     af
3a51  15        dec     d
3a52  f1        pop     af
3a53  be        cp      (hl)
3a54  f0        ret     p

3a55  80        add     a,b
3a56  2010      jr      nz,#3a68        ; (16)
3a58  08        ex      af,af'
3a59  04        inc     b
3a5a  02        ld      (bc),a
3a5b  01ffff    ld      bc,#ffff
3a5e  02        ld      (bc),a
3a5f  3b        dec     sp
3a60  ed3a      db      #ed, #3a        ; Undocumented 8 T-State NOP
3a62  d7        rst     #10
3a63  3ac03a    ld      a,(#3ac0)
3a66  b3        or      e
3a67  3aa53a    ld      a,(#3aa5)
3a6a  97        sub     a
3a6b  3a873a    ld      a,(#3a87)
3a6e  70        ld      (hl),b
3a6f  3a4245    ld      a,(#4542)
3a72  45        ld      b,l
3a73  50        ld      d,b
3a74  204f      jr      nz,#3ac5        ; (79)
3a76  4e        ld      c,(hl)
3a77  2045      jr      nz,#3abe        ; (69)
3a79  52        ld      d,d
3a7a  52        ld      d,d
3a7b  2054      jr      nz,#3ad1        ; (84)
3a7d  52        ld      d,d
3a7e  41        ld      b,c
3a7f  4e        ld      c,(hl)
3a80  53        ld      d,e
3a81  49        ld      c,c
3a82  54        ld      d,h
3a83  49        ld      c,c
3a84  4f        ld      c,a
3a85  4e        ld      c,(hl)
3a86  00        nop     
3a87  45        ld      b,l
3a88  58        ld      e,b
3a89  45        ld      b,l
3a8a  52        ld      d,d
3a8b  43        ld      b,e
3a8c  49        ld      c,c
3a8d  53        ld      d,e
3a8e  45        ld      b,l
3a8f  2045      jr      nz,#3ad6        ; (69)
3a91  52        ld      d,d
3a92  52        ld      d,d
3a93  4f        ld      c,a
3a94  52        ld      d,d
3a95  53        ld      d,e
3a96  00        nop     
3a97  54        ld      d,h
3a98  52        ld      d,d
3a99  41        ld      b,c
3a9a  50        ld      d,b
3a9b  2044      jr      nz,#3ae1        ; (68)
3a9d  41        ld      b,c
3a9e  54        ld      d,h
3a9f  41        ld      b,c
3aa0  2045      jr      nz,#3ae7        ; (69)
3aa2  52        ld      d,d
3aa3  52        ld      d,d
3aa4  00        nop     
3aa5  54        ld      d,h
3aa6  52        ld      d,d
3aa7  41        ld      b,c
3aa8  50        ld      d,b
3aa9  2041      jr      nz,#3aec        ; (65)
3aab  44        ld      b,h
3aac  44        ld      b,h
3aad  52        ld      d,d
3aae  2045      jr      nz,#3af5        ; (69)
3ab0  52        ld      d,d
3ab1  52        ld      d,d
3ab2  00        nop     
3ab3  54        ld      d,h
3ab4  52        ld      d,d
3ab5  41        ld      b,c
3ab6  50        ld      d,b
3ab7  2043      jr      nz,#3afc        ; (67)
3ab9  54        ld      d,h
3aba  4c        ld      c,h
3abb  2045      jr      nz,#3b02        ; (69)
3abd  52        ld      d,d
3abe  52        ld      d,d
3abf  00        nop     
3ac0  54        ld      d,h
3ac1  52        ld      d,d
3ac2  41        ld      b,c
3ac3  50        ld      d,b
3ac4  2041      jr      nz,#3b07        ; (65)
3ac6  43        ld      b,e
3ac7  54        ld      d,h
3ac8  49        ld      c,c
3ac9  56        ld      d,(hl)
3aca  45        ld      b,l
3acb  2046      jr      nz,#3b13        ; (70)
3acd  4f        ld      c,a
3ace  52        ld      d,d
3acf  43        ld      b,e
3ad0  45        ld      b,l
3ad1  204c      jr      nz,#3b1f        ; (76)
3ad3  49        ld      c,c
3ad4  4e        ld      c,(hl)
3ad5  45        ld      b,l
3ad6  00        nop     
3ad7  54        ld      d,h
3ad8  52        ld      d,d
3ad9  41        ld      b,c
3ada  50        ld      d,b
3adb  2041      jr      nz,#3b1e        ; (65)
3add  43        ld      b,e
3ade  54        ld      d,h
3adf  49        ld      c,c
3ae0  56        ld      d,(hl)
3ae1  45        ld      b,l
3ae2  2049      jr      nz,#3b2d        ; (73)
3ae4  4e        ld      c,(hl)
3ae5  54        ld      d,h
3ae6  45        ld      b,l
3ae7  52        ld      d,d
3ae8  52        ld      d,d
3ae9  55        ld      d,l
3aea  50        ld      d,b
3aeb  54        ld      d,h
3aec  00        nop     
3aed  54        ld      d,h
3aee  52        ld      d,d
3aef  41        ld      b,c
3af0  50        ld      d,b
3af1  2049      jr      nz,#3b3c        ; (73)
3af3  4c        ld      c,h
3af4  4c        ld      c,h
3af5  45        ld      b,l
3af6  47        ld      b,a
3af7  41        ld      b,c
3af8  4c        ld      c,h
3af9  2041      jr      nz,#3b3c        ; (65)
3afb  44        ld      b,h
3afc  44        ld      b,h
3afd  52        ld      d,d
3afe  45        ld      b,l
3aff  53        ld      d,e
3b00  53        ld      d,e
3b01  00        nop     
3b02  54        ld      d,h
3b03  52        ld      d,d
3b04  41        ld      b,c
3b05  50        ld      d,b
3b06  2042      jr      nz,#3b4a        ; (66)
3b08  41        ld      b,c
3b09  44        ld      b,h
3b0a  2050      jr      nz,#3b5c        ; (80)
3b0c  57        ld      d,a
3b0d  52        ld      d,d
3b0e  2053      jr      nz,#3b63        ; (83)
3b10  55        ld      d,l
3b11  50        ld      d,b
3b12  50        ld      d,b
3b13  4c        ld      c,h
3b14  59        ld      e,c
3b15  00        nop     
3b16  3f        ccf     
3b17  2000      jr      nz,#3b19        ; (0)
3b19  45        ld      b,l
3b1a  4e        ld      c,(hl)
3b1b  41        ld      b,c
3b1c  42        ld      b,d
3b1d  4c        ld      c,h
3b1e  45        ld      b,l
3b1f  2000      jr      nz,#3b21        ; (0)
3b21  e7        rst     #20
3b22  21f6ff    ld      hl,#fff6
3b25  39        add     hl,sp
3b26  f9        ld      sp,hl
3b27  2e71      ld      l,#71
3b29  cf        rst     #8
3b2a  dd7e06    ld      a,(ix+#06)
3b2d  b7        or      a
3b2e  2827      jr      z,#3b57         ; (39)
3b30  21193b    ld      hl,#3b19
3b33  ef        rst     #28
3b34  dd4e04    ld      c,(ix+#04)
3b37  97        sub     a
3b38  47        ld      b,a
3b39  69        ld      l,c
3b3a  60        ld      h,b
3b3b  5d        ld      e,l
3b3c  54        ld      d,h
3b3d  29        add     hl,hl
3b3e  19        add     hl,de
3b3f  29        add     hl,hl
3b40  19        add     hl,de
3b41  01dbf0    ld      bc,#f0db
3b44  09        add     hl,bc
3b45  ef        rst     #28
3b46  2113f1    ld      hl,#f113
3b49  dd75f8    ld      (ix-#08),l
3b4c  dd74f9    ld      (ix-#07),h
3b4f  dd7e06    ld      a,(ix+#06)
3b52  dd77f7    ld      (ix-#09),a
3b55  1833      jr      #3b8a           ; (51)
3b57  dd4e04    ld      c,(ix+#04)
3b5a  97        sub     a
3b5b  47        ld      b,a
3b5c  69        ld      l,c
3b5d  60        ld      h,b
3b5e  29        add     hl,hl
3b5f  015e3a    ld      bc,#3a5e
3b62  09        add     hl,bc
3b63  7e        ld      a,(hl)
3b64  23        inc     hl
3b65  66        ld      h,(hl)
3b66  6f        ld      l,a
3b67  ef        rst     #28
3b68  dd4e04    ld      c,(ix+#04)
3b6b  97        sub     a
3b6c  47        ld      b,a
3b6d  69        ld      l,c
3b6e  60        ld      h,b
3b6f  29        add     hl,hl
3b70  01433a    ld      bc,#3a43
3b73  09        add     hl,bc
3b74  7e        ld      a,(hl)
3b75  dd77f8    ld      (ix-#08),a
3b78  23        inc     hl
3b79  7e        ld      a,(hl)
3b7a  dd77f9    ld      (ix-#07),a
3b7d  21553a    ld      hl,#3a55
3b80  dd5e04    ld      e,(ix+#04)
3b83  97        sub     a
3b84  57        ld      d,a
3b85  19        add     hl,de
3b86  7e        ld      a,(hl)
3b87  dd77f7    ld      (ix-#09),a
3b8a  21163b    ld      hl,#3b16
3b8d  ef        rst     #28
3b8e  dd6ef8    ld      l,(ix-#08)
3b91  dd66f9    ld      h,(ix-#07)
3b94  7e        ld      a,(hl)
3b95  6f        ld      l,a
3b96  dda6f7    and     (ix-#09)
3b99  2804      jr      z,#3b9f         ; (4)
3b9b  0e56      ld      c,#56
3b9d  1802      jr      #3ba1           ; (2)
3b9f  0e57      ld      c,#57
3ba1  69        ld      l,c
3ba2  d7        rst     #10
3ba3  2e72      ld      l,#72
3ba5  cf        rst     #8
3ba6  2e06      ld      l,#06
3ba8  cd9573    call    #7395
3bab  79        ld      a,c
3bac  fe01      cp      #01
3bae  280e      jr      z,#3bbe         ; (14)
3bb0  3a27f1    ld      a,(#f127)
3bb3  fe1b      cp      #1b
3bb5  2807      jr      z,#3bbe         ; (7)
3bb7  3a27f1    ld      a,(#f127)
3bba  fe1a      cp      #1a
3bbc  2006      jr      nz,#3bc4        ; (6)
3bbe  cde6b8    call    #b8e6
3bc1  c38bbe    jp      #be8b
3bc4  3a27f1    ld      a,(#f127)
3bc7  fe1c      cp      #1c
3bc9  2004      jr      nz,#3bcf        ; (4)
3bcb  0e56      ld      c,#56
3bcd  1802      jr      #3bd1           ; (2)
3bcf  0e57      ld      c,#57
3bd1  dd71f6    ld      (ix-#0a),c
3bd4  dd6ef6    ld      l,(ix-#0a)
3bd7  e5        push    hl
3bd8  2eff      ld      l,#ff
3bda  cd657f    call    #7f65
3bdd  dd7ef6    ld      a,(ix-#0a)
3be0  fe56      cp      #56
3be2  200d      jr      nz,#3bf1        ; (13)
3be4  dd6ef8    ld      l,(ix-#08)
3be7  dd66f9    ld      h,(ix-#07)
3bea  7e        ld      a,(hl)
3beb  ddb6f7    or      (ix-#09)
3bee  77        ld      (hl),a
3bef  180f      jr      #3c00           ; (15)
3bf1  dd6ef8    ld      l,(ix-#08)
3bf4  dd66f9    ld      h,(ix-#07)
3bf7  dd4ef7    ld      c,(ix-#09)
3bfa  79        ld      a,c
3bfb  2f        cpl     
3bfc  4f        ld      c,a
3bfd  7e        ld      a,(hl)
3bfe  a1        and     c
3bff  77        ld      (hl),a
3c00  dd7e06    ld      a,(ix+#06)
3c03  b7        or      a
3c04  caa63b    jp      z,#3ba6
3c07  cdddb8    call    #b8dd
3c0a  79        ld      a,c
3c0b  fe02      cp      #02
3c0d  c2a63b    jp      nz,#3ba6
3c10  c38bbe    jp      #be8b
3c13  c1        pop     bc
3c14  f0        ret     p

3c15  e1        pop     hl
3c16  f233f3    jp      p,#f333
3c19  28f3      jr      z,#3c0e         ; (-13)
3c1b  37        scf     
3c1c  f3        di      
3c1d  ba        cp      d
3c1e  f0        ret     p

3c1f  35        dec     (hl)
3c20  f1        pop     af
3c21  1010      djnz    #3c33           ; (16)
3c23  0a        ld      a,(bc)
3c24  1010      djnz    #3c36           ; (16)
3c26  100a      djnz    #3c32           ; (10)
3c28  04        inc     b
3c29  04        inc     b
3c2a  010202    ld      bc,#0202
3c2d  08        ex      af,af'
3c2e  01ffff    ld      bc,#ffff
3c31  ff        rst     #38
3c32  ff        rst     #38
3c33  ff        rst     #38
3c34  ff        rst     #38
3c35  ff        rst     #38
3c36  ff        rst     #38
3c37  00        nop     
3c38  00        nop     
3c39  60        ld      h,b
3c3a  ea0000    jp      pe,#0000
3c3d  ff        rst     #38
3c3e  00        nop     
3c3f  00        nop     
3c40  00        nop     
3c41  ff        rst     #38
3c42  00        nop     
3c43  ff        rst     #38
3c44  ff        rst     #38
3c45  ff        rst     #38
3c46  ff        rst     #38
3c47  00        nop     
3c48  00        nop     
3c49  ff        rst     #38
3c4a  00        nop     
3c4b  00        nop     
3c4c  00        nop     
3c4d  00        nop     
3c4e  00        nop     
3c4f  00        nop     
3c50  00        nop     
3c51  00        nop     
3c52  00        nop     
3c53  00        nop     
3c54  00        nop     
3c55  00        nop     
3c56  00        nop     
3c57  00        nop     
3c58  00        nop     
3c59  00        nop     
3c5a  00        nop     
3c5b  00        nop     
3c5c  00        nop     
3c5d  00        nop     
3c5e  00        nop     
3c5f  00        nop     
3c60  00        nop     
3c61  00        nop     
3c62  00        nop     
3c63  00        nop     
3c64  00        nop     
3c65  0a        ld      a,(bc)
3c66  00        nop     
3c67  2d        dec     l
3c68  43        ld      b,e
3c69  48        ld      c,b
3c6a  41        ld      b,c
3c6b  4e        ld      c,(hl)
3c6c  47        ld      b,a
3c6d  45        ld      b,l
3c6e  3f        ccf     
3c6f  00        nop     
3c70  2d        dec     l
3c71  43        ld      b,e
3c72  48        ld      c,b
3c73  41        ld      b,c
3c74  4e        ld      c,(hl)
3c75  47        ld      b,a
3c76  45        ld      b,l
3c77  3f        ccf     
3c78  00        nop     
3c79  e7        rst     #20
3c7a  21f7ff    ld      hl,#fff7
3c7d  39        add     hl,sp
3c7e  f9        ld      sp,hl
3c7f  dd4e04    ld      c,(ix+#04)
3c82  97        sub     a
3c83  47        ld      b,a
3c84  69        ld      l,c
3c85  60        ld      h,b
3c86  29        add     hl,hl
3c87  01133c    ld      bc,#3c13
3c8a  09        add     hl,bc
3c8b  7e        ld      a,(hl)
3c8c  dd77f8    ld      (ix-#08),a
3c8f  23        inc     hl
3c90  7e        ld      a,(hl)
3c91  dd77f9    ld      (ix-#07),a
3c94  21213c    ld      hl,#3c21
3c97  dd5e04    ld      e,(ix+#04)
3c9a  97        sub     a
3c9b  57        ld      d,a
3c9c  19        add     hl,de
3c9d  7e        ld      a,(hl)
3c9e  dd77f7    ld      (ix-#09),a
3ca1  dd4e04    ld      c,(ix+#04)
3ca4  97        sub     a
3ca5  47        ld      b,a
3ca6  69        ld      l,c
3ca7  60        ld      h,b
3ca8  29        add     hl,hl
3ca9  014504    ld      bc,#0445
3cac  09        add     hl,bc
3cad  7e        ld      a,(hl)
3cae  23        inc     hl
3caf  66        ld      h,(hl)
3cb0  6f        ld      l,a
3cb1  ef        rst     #28
3cb2  2e60      ld      l,#60
3cb4  d7        rst     #10
3cb5  21283c    ld      hl,#3c28
3cb8  dd5e04    ld      e,(ix+#04)
3cbb  97        sub     a
3cbc  57        ld      d,a
3cbd  19        add     hl,de
3cbe  6e        ld      l,(hl)
3cbf  e5        push    hl
3cc0  dd6ef7    ld      l,(ix-#09)
3cc3  e5        push    hl
3cc4  dd6ef8    ld      l,(ix-#08)
3cc7  dd66f9    ld      h,(ix-#07)
3cca  cdc57f    call    #7fc5
3ccd  21703c    ld      hl,#3c70
3cd0  ef        rst     #28
3cd1  2e06      ld      l,#06
3cd3  cd9573    call    #7395
3cd6  3a27f1    ld      a,(#f127)
3cd9  fe1c      cp      #1c
3cdb  2039      jr      nz,#3d16        ; (57)
3cdd  2e59      ld      l,#59
3cdf  cf        rst     #8
3ce0  2e5a      ld      l,#5a
3ce2  cf        rst     #8
3ce3  dd4e04    ld      c,(ix+#04)
3ce6  97        sub     a
3ce7  47        ld      b,a
3ce8  69        ld      l,c
3ce9  60        ld      h,b
3cea  29        add     hl,hl
3ceb  29        add     hl,hl
3cec  012f3c    ld      bc,#3c2f
3cef  09        add     hl,bc
3cf0  e5        push    hl
3cf1  dd4e04    ld      c,(ix+#04)
3cf4  97        sub     a
3cf5  47        ld      b,a
3cf6  69        ld      l,c
3cf7  60        ld      h,b
3cf8  29        add     hl,hl
3cf9  29        add     hl,hl
3cfa  014b3c    ld      bc,#3c4b
3cfd  09        add     hl,bc
3cfe  e5        push    hl
3cff  2e04      ld      l,#04
3d01  e5        push    hl
3d02  dd6ef7    ld      l,(ix-#09)
3d05  e5        push    hl
3d06  dd6ef8    ld      l,(ix-#08)
3d09  dd66f9    ld      h,(ix-#07)
3d0c  cd4c78    call    #784c
3d0f  79        ld      a,c
3d10  b7        or      a
3d11  2011      jr      nz,#3d24        ; (17)
3d13  c384be    jp      #be84
3d16  3a27f1    ld      a,(#f127)
3d19  fe1d      cp      #1d
3d1b  2011      jr      nz,#3d2e        ; (17)
3d1d  3e1b      ld      a,#1b
3d1f  3227f1    ld      (#f127),a
3d22  180a      jr      #3d2e           ; (10)
3d24  2e5a      ld      l,#5a
3d26  cf        rst     #8
3d27  21673c    ld      hl,#3c67
3d2a  ef        rst     #28
3d2b  c3d13c    jp      #3cd1
3d2e  cde6b8    call    #b8e6
3d31  c384be    jp      #be84
3d34  202d      jr      nz,#3d63        ; (45)
3d36  204d      jr      nz,#3d85        ; (77)
3d38  41        ld      b,c
3d39  59        ld      e,c
3d3a  204e      jr      nz,#3d8a        ; (78)
3d3c  45        ld      b,l
3d3d  45        ld      b,l
3d3e  44        ld      b,h
3d3f  2052      jr      nz,#3d93        ; (82)
3d41  45        ld      b,l
3d42  53        ld      d,e
3d43  45        ld      b,l
3d44  54        ld      d,h
3d45  00        nop     
3d46  f7        rst     #30
3d47  f5        push    af
3d48  f5        push    af
3d49  f5        push    af
3d4a  f5        push    af
3d4b  2e58      ld      l,#58
3d4d  cf        rst     #8
3d4e  2e29      ld      l,#29
3d50  d7        rst     #10
3d51  2e76      ld      l,#76
3d53  d7        rst     #10
3d54  213d04    ld      hl,#043d
3d57  e5        push    hl
3d58  214104    ld      hl,#0441
3d5b  e5        push    hl
3d5c  2e08      ld      l,#08
3d5e  e5        push    hl
3d5f  2e10      ld      l,#10
3d61  e5        push    hl
3d62  219cf1    ld      hl,#f19c
3d65  cd4c78    call    #784c
3d68  dd71f9    ld      (ix-#07),c
3d6b  dd7ef9    ld      a,(ix-#07)
3d6e  b7        or      a
3d6f  2003      jr      nz,#3d74        ; (3)
3d71  c372be    jp      #be72
3d74  dd7ef9    ld      a,(ix-#07)
3d77  fe02      cp      #02
3d79  201d      jr      nz,#3d98        ; (29)
3d7b  2e59      ld      l,#59
3d7d  cf        rst     #8
3d7e  2e5a      ld      l,#5a
3d80  cf        rst     #8
3d81  2e5a      ld      l,#5a
3d83  cf        rst     #8
3d84  2e1c      ld      l,#1c
3d86  d7        rst     #10
3d87  3a40f1    ld      a,(#f140)
3d8a  fe02      cp      #02
3d8c  280a      jr      z,#3d98         ; (10)
3d8e  219cf1    ld      hl,#f19c
3d91  e5        push    hl
3d92  21e1f2    ld      hl,#f2e1
3d95  e5        push    hl
3d96  df        rst     #18
3d97  f1        pop     af
3d98  3a40f1    ld      a,(#f140)
3d9b  fe02      cp      #02
3d9d  2005      jr      nz,#3da4        ; (5)
3d9f  cd229a    call    #9a22
3da2  182a      jr      #3dce           ; (42)
3da4  97        sub     a
3da5  32a0f1    ld      (#f1a0),a
3da8  2e01      ld      l,#01
3daa  cd1d8b    call    #8b1d
3dad  dd71f8    ld      (ix-#08),c
3db0  dd7ef8    ld      a,(ix-#08)
3db3  b7        or      a
3db4  2006      jr      nz,#3dbc        ; (6)
3db6  21343d    ld      hl,#3d34
3db9  ef        rst     #28
3dba  180d      jr      #3dc9           ; (13)
3dbc  dd7ef8    ld      a,(ix-#08)
3dbf  fe01      cp      #01
3dc1  2006      jr      nz,#3dc9        ; (6)
3dc3  2e63      ld      l,#63
3dc5  d7        rst     #10
3dc6  2e69      ld      l,#69
3dc8  d7        rst     #10
3dc9  3e01      ld      a,#01
3dcb  32a0f1    ld      (#f1a0),a
3dce  c372be    jp      #be72
3dd1  00        nop     
3dd2  00        nop     
3dd3  ff        rst     #38
3dd4  ff        rst     #38
3dd5  00        nop     
3dd6  00        nop     
3dd7  010003    ld      bc,#0300
3dda  111312    ld      de,#1213
3ddd  323e75    ld      (#753e),a
3de0  3e6f      ld      a,#6f
3de2  3e2e      ld      a,#2e
3de4  3e04      ld      a,#04
3de6  1b        dec     de
3de7  1a        ld      a,(de)
3de8  1c        inc     e
3de9  1d        dec     e
3dea  2b        dec     hl
3deb  40        ld      b,b
3dec  fa414b    jp      m,#4b41
3def  40        ld      b,b
3df0  2e40      ld      l,#40
3df2  0e40      ld      c,#40
3df4  2053      jr      nz,#3e49        ; (83)
3df6  49        ld      c,c
3df7  47        ld      b,a
3df8  2000      jr      nz,#3dfa        ; (0)
3dfa  2042      jr      nz,#3e3e        ; (66)
3dfc  54        ld      d,h
3dfd  53        ld      d,e
3dfe  2000      jr      nz,#3e00        ; (0)
3e00  2042      jr      nz,#3e44        ; (66)
3e02  54        ld      d,h
3e03  53        ld      d,e
3e04  2000      jr      nz,#3e06        ; (0)
3e06  2053      jr      nz,#3e5b        ; (83)
3e08  49        ld      c,c
3e09  47        ld      b,a
3e0a  2000      jr      nz,#3e0c        ; (0)
3e0c  49        ld      c,c
3e0d  4e        ld      c,(hl)
3e0e  46        ld      b,(hl)
3e0f  4f        ld      c,a
3e10  00        nop     
3e11  4e        ld      c,(hl)
3e12  4f        ld      c,a
3e13  2000      jr      nz,#3e15        ; (0)
3e15  f7        rst     #30
3e16  21f5ff    ld      hl,#fff5
3e19  39        add     hl,sp
3e1a  f9        ld      sp,hl
3e1b  97        sub     a
3e1c  32a0f1    ld      (#f1a0),a
3e1f  3a27f1    ld      a,(#f127)
3e22  dd77f5    ld      (ix-#0b),a
3e25  dd4ef5    ld      c,(ix-#0b)
3e28  21d93d    ld      hl,#3dd9
3e2b  c3edb8    jp      #b8ed
3e2e  dd36f702  ld      (ix-#09),#02
3e32  21ffff    ld      hl,#ffff
3e35  22c7f4    ld      (#f4c7),hl
3e38  97        sub     a
3e39  32cbf4    ld      (#f4cb),a
3e3c  32ccf4    ld      (#f4cc),a
3e3f  3a3ef1    ld      a,(#f13e)
3e42  5f        ld      e,a
3e43  87        add     a,a
3e44  9f        sbc     a,a
3e45  57        ld      d,a
3e46  3acbf4    ld      a,(#f4cb)
3e49  93        sub     e
3e4a  3accf4    ld      a,(#f4cc)
3e4d  9a        sbc     a,d
3e4e  f2843e    jp      p,#3e84
3e51  2acbf4    ld      hl,(#f4cb)
3e54  e5        push    hl
3e55  211200    ld      hl,#0012
3e58  e5        push    hl
3e59  cd2dba    call    #ba2d
3e5c  e1        pop     hl
3e5d  01b6e9    ld      bc,#e9b6
3e60  09        add     hl,bc
3e61  7e        ld      a,(hl)
3e62  ddbef7    cp      (ix-#09)
3e65  2014      jr      nz,#3e7b        ; (20)
3e67  2acbf4    ld      hl,(#f4cb)
3e6a  22c7f4    ld      (#f4c7),hl
3e6d  1815      jr      #3e84           ; (21)
3e6f  dd36f703  ld      (ix-#09),#03
3e73  18bd      jr      #3e32           ; (-67)
3e75  dd36f701  ld      (ix-#09),#01
3e79  18b7      jr      #3e32           ; (-73)
3e7b  2acbf4    ld      hl,(#f4cb)
3e7e  23        inc     hl
3e7f  22cbf4    ld      (#f4cb),hl
3e82  18bb      jr      #3e3f           ; (-69)
3e84  2e10      ld      l,#10
3e86  cd36b1    call    #b136
3e89  2e71      ld      l,#71
3e8b  cf        rst     #8
3e8c  2e58      ld      l,#58
3e8e  cf        rst     #8
3e8f  3ac7f4    ld      a,(#f4c7)
3e92  feff      cp      #ff
3e94  2005      jr      nz,#3e9b        ; (5)
3e96  3ac8f4    ld      a,(#f4c8)
3e99  feff      cp      #ff
3e9b  2018      jr      nz,#3eb5        ; (24)
3e9d  21ffff    ld      hl,#ffff
3ea0  22c9f4    ld      (#f4c9),hl
3ea3  22cdf4    ld      (#f4cd),hl
3ea6  21113e    ld      hl,#3e11
3ea9  ef        rst     #28
3eaa  dd6ef5    ld      l,(ix-#0b)
3ead  d7        rst     #10
3eae  210c3e    ld      hl,#3e0c
3eb1  ef        rst     #28
3eb2  c3013f    jp      #3f01
3eb5  2ac7f4    ld      hl,(#f4c7)
3eb8  e5        push    hl
3eb9  211200    ld      hl,#0012
3ebc  e5        push    hl
3ebd  cd2dba    call    #ba2d
3ec0  e1        pop     hl
3ec1  01aee9    ld      bc,#e9ae
3ec4  09        add     hl,bc
3ec5  22cff4    ld      (#f4cf),hl
3ec8  dd6ef5    ld      l,(ix-#0b)
3ecb  d7        rst     #10
3ecc  2e76      ld      l,#76
3ece  d7        rst     #10
3ecf  2e04      ld      l,#04
3ed1  e5        push    hl
3ed2  2e10      ld      l,#10
3ed4  e5        push    hl
3ed5  2acff4    ld      hl,(#f4cf)
3ed8  cdc57f    call    #7fc5
3edb  2acff4    ld      hl,(#f4cf)
3ede  23        inc     hl
3edf  23        inc     hl
3ee0  23        inc     hl
3ee1  23        inc     hl
3ee2  e5        push    hl
3ee3  2acff4    ld      hl,(#f4cf)
3ee6  e5        push    hl
3ee7  cdd9ba    call    #bad9
3eea  283b      jr      z,#3f27         ; (59)
3eec  2e77      ld      l,#77
3eee  d7        rst     #10
3eef  2e04      ld      l,#04
3ef1  e5        push    hl
3ef2  2e10      ld      l,#10
3ef4  e5        push    hl
3ef5  2acff4    ld      hl,(#f4cf)
3ef8  23        inc     hl
3ef9  23        inc     hl
3efa  23        inc     hl
3efb  23        inc     hl
3efc  cdc57f    call    #7fc5
3eff  1826      jr      #3f27           ; (38)
3f01  2e72      ld      l,#72
3f03  cf        rst     #8
3f04  2e06      ld      l,#06
3f06  cd9573    call    #7395
3f09  79        ld      a,c
3f0a  fe01      cp      #01
3f0c  c20440    jp      nz,#4004
3f0f  cde6b8    call    #b8e6
3f12  2e10      ld      l,#10
3f14  cd36b1    call    #b136
3f17  210000    ld      hl,#0000
3f1a  cd6ab0    call    #b06a
3f1d  3e01      ld      a,#01
3f1f  32a0f1    ld      (#f1a0),a
3f22  0e02      ld      c,#02
3f24  c372be    jp      #be72
3f27  dd7ef7    ld      a,(ix-#09)
3f2a  fe03      cp      #03
3f2c  2029      jr      nz,#3f57        ; (41)
3f2e  21063e    ld      hl,#3e06
3f31  ef        rst     #28
3f32  2acff4    ld      hl,(#f4cf)
3f35  010e00    ld      bc,#000e
3f38  09        add     hl,bc
3f39  97        sub     a
3f3a  32d1f4    ld      (#f4d1),a
3f3d  32d2f4    ld      (#f4d2),a
3f40  7e        ld      a,(hl)
3f41  32d3f4    ld      (#f4d3),a
3f44  23        inc     hl
3f45  7e        ld      a,(hl)
3f46  32d4f4    ld      (#f4d4),a
3f49  2e04      ld      l,#04
3f4b  e5        push    hl
3f4c  2e10      ld      l,#10
3f4e  e5        push    hl
3f4f  21d1f4    ld      hl,#f4d1
3f52  cdc57f    call    #7fc5
3f55  181b      jr      #3f72           ; (27)
3f57  dd7ef7    ld      a,(ix-#09)
3f5a  fe01      cp      #01
3f5c  2014      jr      nz,#3f72        ; (20)
3f5e  21003e    ld      hl,#3e00
3f61  ef        rst     #28
3f62  2e01      ld      l,#01
3f64  e5        push    hl
3f65  2e10      ld      l,#10
3f67  e5        push    hl
3f68  2acff4    ld      hl,(#f4cf)
3f6b  010e00    ld      bc,#000e
3f6e  09        add     hl,bc
3f6f  cdc57f    call    #7fc5
3f72  21ffff    ld      hl,#ffff
3f75  22cdf4    ld      (#f4cd),hl
3f78  2ac7f4    ld      hl,(#f4c7)
3f7b  23        inc     hl
3f7c  22cbf4    ld      (#f4cb),hl
3f7f  3a3ef1    ld      a,(#f13e)
3f82  5f        ld      e,a
3f83  87        add     a,a
3f84  9f        sbc     a,a
3f85  57        ld      d,a
3f86  3acbf4    ld      a,(#f4cb)
3f89  93        sub     e
3f8a  3accf4    ld      a,(#f4cc)
3f8d  9a        sbc     a,d
3f8e  f2b23f    jp      p,#3fb2
3f91  2acbf4    ld      hl,(#f4cb)
3f94  e5        push    hl
3f95  211200    ld      hl,#0012
3f98  e5        push    hl
3f99  cd2dba    call    #ba2d
3f9c  e1        pop     hl
3f9d  01b6e9    ld      bc,#e9b6
3fa0  09        add     hl,bc
3fa1  7e        ld      a,(hl)
3fa2  ddbef7    cp      (ix-#09)
3fa5  2041      jr      nz,#3fe8        ; (65)
3fa7  2acbf4    ld      hl,(#f4cb)
3faa  22cdf4    ld      (#f4cd),hl
3fad  2e10      ld      l,#10
3faf  cd1fb1    call    #b11f
3fb2  21ffff    ld      hl,#ffff
3fb5  22c9f4    ld      (#f4c9),hl
3fb8  2ac7f4    ld      hl,(#f4c7)
3fbb  01ffff    ld      bc,#ffff
3fbe  09        add     hl,bc
3fbf  22cbf4    ld      (#f4cb),hl
3fc2  3accf4    ld      a,(#f4cc)
3fc5  b7        or      a
3fc6  fa013f    jp      m,#3f01
3fc9  2acbf4    ld      hl,(#f4cb)
3fcc  e5        push    hl
3fcd  211200    ld      hl,#0012
3fd0  e5        push    hl
3fd1  cd2dba    call    #ba2d
3fd4  e1        pop     hl
3fd5  01b6e9    ld      bc,#e9b6
3fd8  09        add     hl,bc
3fd9  7e        ld      a,(hl)
3fda  ddbef7    cp      (ix-#09)
3fdd  2013      jr      nz,#3ff2        ; (19)
3fdf  2acbf4    ld      hl,(#f4cb)
3fe2  22c9f4    ld      (#f4c9),hl
3fe5  c3013f    jp      #3f01
3fe8  2acbf4    ld      hl,(#f4cb)
3feb  23        inc     hl
3fec  22cbf4    ld      (#f4cb),hl
3fef  c37f3f    jp      #3f7f
3ff2  3acbf4    ld      a,(#f4cb)
3ff5  d601      sub     #01
3ff7  32cbf4    ld      (#f4cb),a
3ffa  3accf4    ld      a,(#f4cc)
3ffd  de00      sbc     a,#00
3fff  320000    ld      (#0000),a
